add set/buddy.

[spider.git] / perl / Messages

diff --git a/perl/Messages b/perl/Messages
index 760948cd767bc9e34608b63b179b0b6989a790d3..d66e66c1ef3a2f6ce267477f7b565da002e719ff 100644 (file)
--- 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]',