X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=efbc033f5ad1c24e0041fe297b65a7871b1e1e69;hb=bca5cd40374f12da5e0d46980e54bffc61fdc9c9;hp=570e4e7580d50375f4c218ea629f5ef95b189439;hpb=1ead732b2d2cfc4d04d88c83c1c8f00805badebc;p=spider.git diff --git a/perl/Messages b/perl/Messages index 570e4e75..efbc033f 100644 --- a/perl/Messages +++ b/perl/Messages @@ -53,6 +53,8 @@ package DXM; e11 => 'Can\'t use $main:mycall as target', e12 => 'Need a node callsign', e13 => '$_[0] is not a node', + e14 => 'First argument must be numeric and > 0', + emaile1 => 'Please enter your email address, set/email ', emaila => 'Your E-Mail Address is now \"$_[0]\"', email => 'E-mail address set to: $_[0]', @@ -82,6 +84,10 @@ package DXM; lockout => '$_[0] Locked out', lockoutc => '$_[0] Created and Locked out', lockoutun => '$_[0] Unlocked', + loginu => 'User $_[0] has logged in', + logoutu => 'User $_[0] has logged out', + loginn => 'Node $_[0] has logged in', + logoutn => 'Node $_[0] has logged out', m1 => 'Enter Subject (30 characters):', m2 => 'Copy of msg $_[0] sent to $_[1]', m3 => 'Sorry, $_[0] is an unacceptable TO address', @@ -120,6 +126,8 @@ package DXM; pingo => 'Ping Started to $_[0]', pingi => 'Ping Returned from $_[0] $_[1] (Ave $_[2]) secs', pinge1 => 'Cannot ping yourself!', + pingint => 'Ping interval on $_[0] set to $_[1] secs', + pr => '$_[0] de $main::mycall $main::cldate $main::ztime >', pr2 => '($_[0]) de $main::mycall $main::cldate $main::ztime >', priv => 'Privilege level changed on $_[0]',