X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=d66e66c1ef3a2f6ce267477f7b565da002e719ff;hb=679037f49e292b15a73dce96699c15b9e3049711;hp=760948cd767bc9e34608b63b179b0b6989a790d3;hpb=91f85337c85425f44cffa4346d4f0210c746e6e7;p=spider.git

diff --git a/perl/Messages b/perl/Messages
index 760948cd..d66e66c1 100644
--- a/perl/Messages
+++ b/perl/Messages
@@ -26,6 +26,8 @@ package DXM;
 				beepon => 'Beeps are now on',
 				believes => 'Believe node $_[0] via $_[1]',
 				believeu => 'Don\'t believe node $_[0] via $_[1]', 
+				buddya => '$_[0] has been added to your buddies',
+				buddyu => '$_[0] has been removed from your buddies',
 				call1 => 'Callsign lookup via $_[0]:',
 				conother => 'Sorry $_[0] you are connected to me on another port',
 				concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster (on $_[1])',
@@ -115,6 +117,8 @@ package DXM;
 				filter4 => '$_[0]$_[1] Filter $_[2] deleted for $_[3]',
 				filter5 => 'need some filter commands...',
 				filter6 => '$_[0]$_[1] Filter for $[2] not found',
+				grayline1 => '                                                 Beg of               End of',
+				grayline2 => 'Location                              dd/mm/yyyy Dawn   Rise   Set    Dusk',
 				grids => 'DX Grid enabled for $_[0]',
 				gridu => 'DX Grid disabled for $_[0]',
 				illcall => 'Sorry, $_[0] is an invalid callsign',
@@ -150,6 +154,8 @@ package DXM;
 				lange2 => 'failed to set language on $_[0]', 
 				lastconn => 'Last connect',
 				leave => 'leaving group $_[0]',
+				lgset => 'Added $_[0] to the local node group',
+				lgunset => 'Removed $_[0] from the local node group',
 				lh1 => '$main::data/hop_table.pl doesn\'t exist',
 				local1 => 'Local',
 				loce1 => 'Please enter your location,, set/location <latitude longitude>',
@@ -161,6 +167,8 @@ package DXM;
 				lockoutc => '$_[0] Created and Locked out',
 				lockoutun => '$_[0] Unlocked',
 				lockoutuse => 'usage: sh/lockout <call>|ALL',
+				loginb => 'Buddy $_[0] has logged in',
+				logoutb => 'Buddy $_[0] has logged out',
 				loginu => 'User $_[0] has logged in',
 				logoutu => 'User $_[0] has logged out',
 				loginn => 'Node $_[0] has logged in',
@@ -231,6 +239,7 @@ package DXM;
 				pinge1 => 'Cannot ping yourself!',
 				pingint => 'Ping interval on $_[0] set to $_[1] secs',
 				'pos' => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]',
+                                pr => '%C de %M %D %T dxspider >',
 				prs => 'Prompt is changed',
 				pru => 'Prompt now set back to default',
 				priv => 'Privilege level changed on $_[0]',