X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=e7d9d8c650e959823f3b3d720c29023618b9121b;hb=04f192bf9da26bd6fbed506a2cbb2a10dda25d35;hp=0f753716549b70f47a4775c78abc39e09e9697bc;hpb=4b1dd2cb842a8e7df9b1b3e9a8e166e333dfec0a;p=spider.git diff --git a/perl/Messages b/perl/Messages index 0f753716..e7d9d8c6 100644 --- a/perl/Messages +++ b/perl/Messages @@ -57,6 +57,7 @@ package DXM; e14 => 'First argument must be numeric and > 0', e15 => 'invalid qualifier \"$_[0]\"', e16 => 'File \"$_[0]\" exists', + e17 => 'Please don\'t use the words: @_ on here', echoon => 'Echoing enabled', echooff => 'Echoing disabled', @@ -147,7 +148,7 @@ package DXM; pingi => 'Ping Returned from $_[0] $_[1] (Ave $_[2]) secs', pinge1 => 'Cannot ping yourself!', pingint => 'Ping interval on $_[0] set to $_[1] secs', - pos => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]', + 'pos' => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]', pr => '$_[0] de $main::mycall $main::cldate $main::ztime >', pr2 => '($_[0]) de $main::mycall $main::cldate $main::ztime >', priv => 'Privilege level changed on $_[0]',