put field 2 check for PC11 back to 'm'

[spider.git] / perl / Messages

diff --git a/perl/Messages b/perl/Messages
index e7d9d8c650e959823f3b3d720c29023618b9121b..2b2ef76380e43153cd7a5ba1eaf6414234942f40 100644 (file)
--- a/perl/Messages
+++ b/perl/Messages
@@ -18,6 +18,7 @@ package DXM;
                                bbs => 'Your BBS Address is now \"$_[0]\"',
                                beepoff => 'Beeps are now off',
                                beepon => 'Beeps are now on',
+                               call1 => 'Callsign lookup via Pineknot:',
                                conother => 'Sorry $_[0] you are connected on another port',
                                concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster',
                                conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',
@@ -36,6 +37,7 @@ package DXM;
                                db9 => 'Database $_[0] removed',
                                db10 => '$_[0] records imported into $_[1]',
                                db11 => 'Sending your request(s) to $_[0], please stand by...',
+                               dfreq1 => 'Invalid freq $_[0] need: eg 0/30000 or hf or hf/cw', 
                                dup => 'Sorry, this is a duplicate',
                                dx1 => 'Frequency $_[0] not in band (see show/band); usage: DX [BY call] freq call comments',
                                dx2 => 'Need a callsign; usage: DX [BY call] freq call comments',
@@ -58,6 +60,9 @@ package DXM;
                                e15 => 'invalid qualifier \"$_[0]\"',
                                e16 => 'File \"$_[0]\" exists',
                                e17 => 'Please don\'t use the words: @_ on here', 
+                               e18 => 'Cannot connect to $_[0] ($!)',
+                               e19 => 'Invalid character in line',
+                               e20 => 'token $_[0] not recognised',
 
                                echoon => 'Echoing enabled',
                                echooff => 'Echoing disabled',
@@ -68,6 +73,8 @@ package DXM;
                                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]',
+                               filter2 => 'Need a value for $_[0]',
                                grids => 'DX Grid flag set on $_[0]',
                                gridu => 'DX Grid flag unset on $_[0]',
                                helpe1 => 'Help system unavailable, tell sysop',