fix messages in DXDb.pm to point to the correct ones. Thanks Rene (oz1lqh)

[spider.git] / perl / Messages

diff --git a/perl/Messages b/perl/Messages
index 6a2b4fb5722507abcb75b53ab4a3314f16c2663e..60ad432c34801c765206d0cbf1b5fe27dc1b2eb4 100644 (file)
--- a/perl/Messages
+++ b/perl/Messages
@@ -12,10 +12,10 @@ package DXM;
                 en => {
                                addr => 'Address set to: $_[0]',
                 already => '$_[0] already connnected',
-                               anns => 'Announce flag set on $_[0]',
-                               annu => 'Announce flag unset on $_[0]',
-                               annts => 'AnnTalk flag set on $_[0]',
-                               anntu => 'AnnTalk flag unset on $_[0]',
+                               anns => 'Announces enabled for $_[0]',
+                               annu => 'Announces disabled for $_[0]',
+                               annts => 'AnnTalk enabled for $_[0]',
+                               anntu => 'AnnTalk disabled for $_[0]',
                                badnode1 => '$_[0] is now a bad node',
                                badnode2 => '$_[0] is now a good node',
                                badnode3 => 'List of Bad Nodes:-',
@@ -52,8 +52,8 @@ package DXM;
                                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',
                                dx3 => 'The callsign or frequency is invalid',
-                               dxs => 'DX Spots flag set on $_[0]',
-                               dxu => 'DX Spots flag unset on $_[0]',
+                               dxs => 'DX Spots enabled for $_[0]',
+                               dxu => 'DX Spots disabled for $_[0]',
                                e1 => 'Invalid command',
                                e2 => 'Error: $_[0]',
                                e3 => '$_[0]: $_[1] not found',
@@ -100,8 +100,8 @@ package DXM;
                                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]',
+                               grids => 'DX Grid enabled for $_[0]',
+                               gridu => 'DX Grid disabled for $_[0]',
                                illcall => 'Sorry, $_[0] is an invalid callsign',
                                hasha => '$_[0] already exists in $_[1]',
                                hashb => '$_[0] added to $_[1]',
@@ -261,8 +261,8 @@ package DXM;
                                time1 => 'Local Time: $_[0] $_[1], UTC $_[2]',
                                time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Hours)',
                                time3 => '$_[0]  $_[1]',
-                               talks => 'Talk flag set on $_[0]',
-                               talku => 'Talk flag unset on $_[0]',
+                               talks => 'Talk enabled for $_[0]',
+                               talku => 'Talk disabled for $_[0]',
                                talkend => 'Finished talking to you',
                                talkinst => 'Entering Talkmode, /EX to end, /<cmd> to run a command',
                                talknh => 'Sorry $_[0] is not online at the moment',
@@ -273,12 +273,14 @@ package DXM;
                                usernf => '*** User record for $_[0] not found ***',
                                wcy1 => '$_[0] is missing or out of range',
                                wcy2 => 'Duplicate WCY',
+                wcys => 'WCY enabled for $_[0]',
+                               wcyu => 'WCY disabled for $_[0]',
                                wwv1 => '$_[0] is missing or out of range',
                                wwv2 => 'Duplicate WWV',
-                               wwvs => 'WWV flag set on $_[0]',
-                               wwvu => 'WWV flag unset on $_[0]',
-                               wxs => 'WX flag set on $_[0]',
-                               wxu => 'WX flag unset on $_[0]',
+                               wwvs => 'WWV enabled for $_[0]',
+                               wwvu => 'WWV disabled $_[0]',
+                               wxs => 'WX enabled for $_[0]',
+                               wxu => 'WX disabled for $_[0]',
                           },
                 nl => {
                                addr => 'Addres gezet op: $_[0]',