projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added set/hops and show/hops commands
[spider.git]
/
perl
/
Messages
diff --git
a/perl/Messages
b/perl/Messages
index 2b2ef76380e43153cd7a5ba1eaf6414234942f40..0840c93f5822328830441e329151d7de9c7180a2 100644
(file)
--- a/
perl/Messages
+++ b/
perl/Messages
@@
-63,6
+63,9
@@
package DXM;
e18 => 'Cannot connect to $_[0] ($!)',
e19 => 'Invalid character in line',
e20 => 'token $_[0] not recognised',
e18 => 'Cannot connect to $_[0] ($!)',
e19 => 'Invalid character in line',
e20 => 'token $_[0] not recognised',
+ e21 => '$_[0] not numeric',
+ e22 => '$_[0] not a callsign',
+ e23 => '$_[0] not a range (eg 0/30000)',
echoon => 'Echoing enabled',
echooff => 'Echoing disabled',
echoon => 'Echoing enabled',
echooff => 'Echoing disabled',
@@
-73,8
+76,12
@@
package DXM;
export1 => 'usage: export <msgno> <filename>',
export2 => '$_[3] has error exporting msg $_[0] to $_[1] ($_[2])',
export3 => '$_[2 ] exported msg $_[0] to $_[1]',
export1 => 'usage: export <msgno> <filename>',
export2 => '$_[3] has error exporting msg $_[0] to $_[1] ($_[2])',
export3 => '$_[2 ] exported msg $_[0] to $_[1]',
- filter1 => 'Filter $_[0] updated $_[1]',
+ filter1 => 'Filter $_[0] updated
for
$_[1]',
filter2 => 'Need a value for $_[0]',
filter2 => 'Need a value for $_[0]',
+ filter3 => 'No filters defined for $_[0]',
+ filter4 => '$_[0]$_[1] Filter $_[2] deleted for $_[3]',
+ filter5 => 'need some filter commands...',
+ filter6 => '$_[0]$_[1] Filter for $[2] not found',
grids => 'DX Grid flag set on $_[0]',
gridu => 'DX Grid flag unset on $_[0]',
helpe1 => 'Help system unavailable, tell sysop',
grids => 'DX Grid flag set on $_[0]',
gridu => 'DX Grid flag unset on $_[0]',
helpe1 => 'Help system unavailable, tell sysop',
@@
-178,6
+185,9
@@
package DXM;
sat4 => 'Satellites available:-',
satnf => 'Satellite $_[0] unknown',
satdisc => '-----',
sat4 => 'Satellites available:-',
satnf => 'Satellite $_[0] unknown',
satdisc => '-----',
+ sethop1 => 'usage: set/hops <call> ann|spots|wwv|wcy <no of hops>',
+ sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]',
+ sethop3 => 'No hops set for $_[0]',
shutting => '$main::mycall shutting down...',
sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
snode1 => 'Node Call Sort Version',
shutting => '$main::mycall shutting down...',
sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
snode1 => 'Node Call Sort Version',