X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=c8381dfc570bb55595f217d3fd2e411ca67ed618;hb=4746cf71bae031c57c24600713d7cfc281d71e20;hp=d79eec7332065a2936ee2de47427eb9c9d7ab07a;hpb=3b73a2dde8b378db6b56438699c5a1f233194dbf;p=spider.git diff --git a/perl/Messages b/perl/Messages index d79eec73..c8381dfc 100644 --- a/perl/Messages +++ b/perl/Messages @@ -34,7 +34,7 @@ package DXM; chatinst => 'Entering Chatmode on $_[0], /EX to end, / to run a command', chatprompt => 'Chat ($_[0])>', chattoomany => 'Not allowed, already in $_[1], use /chat $_[0]', - cluster => 'Nodes: $_[0]/$_[1] Clr - Users: $_[2]/$_[3] Clr Max: $_[4]/$_[5] Clr - Uptime: $_[6]', + cluster => 'Nodes: $_[0]/$_[1] Users [Loc/Clr]: $_[2]/$_[3] Max: $_[4]/$_[5] - Uptime: $_[6]', conother => 'Sorry $_[0] you are connected to me on another port', concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster (on $_[1])', contomany => 'Sorry $_[0] but you are already connected to $_[1] other nodes (on $_[2])', @@ -93,7 +93,7 @@ package DXM; e17 => 'Please don\'t use the words: @_ on here', e18 => 'Cannot connect to $_[0] ($!)', e19 => 'Invalid character in line', - e20 => 'token $_[0] not recognised', + e20 => qq{token '$_[0]' not recognised}, e21 => '$_[0] is not numeric', e22 => '$_[0] is not a callsign', e23 => '$_[0] is not a range (eg 0/30000)', @@ -248,7 +248,8 @@ package DXM; ok => 'Operation successful', outconn => 'Outstanding connect to $_[0]', page => 'Press Enter to continue, A to abort ($_[0] lines) >', - pagelth => 'Page Length is now $_[0]', + pagelth => 'Page Length is now $_[0] lines', + pagewidth => 'Page width is now $_[0] columns', passerr => 'Please use: SET/PASS ', passphrase => 'Passphrase set or changed for $_[0]', passphraseu => 'Passphrase removed for $_[0]', @@ -278,6 +279,7 @@ package DXM; qrashe1 => 'Please enter a QRA locator, eg sh/qra JO02LQ or sh/qra JO02LQ IO93NS', qrae2 => 'Don\'t recognise \"$_[0]\" as a QRA locator (eg JO02LQ)', qra => 'Your QRA Locator is now \"$_[0]\"', + rbnusers => qq{RBN User List}, qsl1 => 'Call Manager Times Last Time Seen De', rcmdo => 'RCMD \"$_[0]\" sent to $_[1]', read1 => 'Sorry, no new messages for you',