centralise the illegal callsign check at login

[spider.git] / perl / Messages

diff --git a/perl/Messages b/perl/Messages
index 69db53864cfc465bffaf0658e31d7f4d0e91aa08..0f9c0e136e6deb6fc1cb2d439fe6d24716674968 100644 (file)
--- a/perl/Messages
+++ b/perl/Messages
@@ -14,6 +14,8 @@ package DXM;
                 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]',
                                badnode1 => '$_[0] is now a bad node',
                                badnode2 => '$_[0] is now a good node',
                                badnode3 => 'List of Bad Nodes:-',
@@ -96,6 +98,7 @@ package DXM;
                                filter6 => '$_[0]$_[1] Filter for $[2] not found',
                                grids => 'DX Grid flag set on $_[0]',
                                gridu => 'DX Grid flag unset on $_[0]',
+                               illcall => 'Sorry, $_[0] is an invalid callsign',
                                hasha => '$_[0] already exists in $_[1]',
                                hashb => '$_[0] added to $_[1]',
                                hashc => '$_[0] removed from $_[1]',
@@ -242,6 +245,7 @@ package DXM;
                                talku => 'Talk flag unset on $_[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',
                                talkprompt => 'Talk ($_[0])>',
                                talkstart => 'Starting talking to you',
                                usernf => '*** User record for $_[0] not found ***',