projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added Iain's winclient
[spider.git]
/
perl
/
Messages
diff --git
a/perl/Messages
b/perl/Messages
index 59f9627964d8d74166b4629dbd8d68ba1a6cbd72..4b0259fb7c809df7391d0ac25b161165de53670d 100644
(file)
--- a/
perl/Messages
+++ b/
perl/Messages
@@
-22,8
+22,8
@@
package DXM;
beepoff => 'Beeps are now off',
beepon => 'Beeps are now on',
call1 => 'Callsign lookup via $_[0]:',
beepoff => 'Beeps are now off',
beepon => 'Beeps are now on',
call1 => 'Callsign lookup via $_[0]:',
- conother => 'Sorry $_[0] you are connected on another port',
- concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster',
+ conother => 'Sorry $_[0] you are connected on another port
here
',
+ concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster
($_[1])
',
conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',
confail => 'connection to $_[0] failed ($_[1])',
constart => 'connection to $_[0] started',
conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',
confail => 'connection to $_[0] failed ($_[1])',
constart => 'connection to $_[0] started',
@@
-89,6
+89,11
@@
package DXM;
filter6 => '$_[0]$_[1] Filter for $[2] not found',
grids => 'DX Grid flag set on $_[0]',
gridu => 'DX Grid flag unset on $_[0]',
filter6 => '$_[0]$_[1] Filter for $[2] not found',
grids => 'DX Grid flag set on $_[0]',
gridu => 'DX Grid flag unset on $_[0]',
+ hasha => '$_[0] already exists in $_[1]',
+ hashb => '$_[0] added to $_[1]',
+ hashc => '$_[0] removed from $_[1]',
+ hashd => '$_[0] not in $_[1]',
+ hashe => '$_[0] set on $_[1]',
helpe1 => 'Help system unavailable, tell sysop',
helpe2 => 'No help available on $_[0]',
heres => 'Here set on $_[0]',
helpe1 => 'Help system unavailable, tell sysop',
helpe2 => 'No help available on $_[0]',
heres => 'Here set on $_[0]',
@@
-218,6
+223,8
@@
package DXM;
talkprompt => 'Talk ($_[0])>',
talkstart => 'Starting talking to you',
usernf => '*** User record for $_[0] not found ***',
talkprompt => 'Talk ($_[0])>',
talkstart => 'Starting talking to you',
usernf => '*** User record for $_[0] not found ***',
+ wcys => 'WCY flag set on $_[0]',
+ wcyu => 'WCY flag unset on $_[0]',
wwvs => 'WWV flag set on $_[0]',
wwvu => 'WWV flag unset on $_[0]',
wxs => 'WX flag set on $_[0]',
wwvs => 'WWV flag set on $_[0]',
wwvu => 'WWV flag unset on $_[0]',
wxs => 'WX flag set on $_[0]',