X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=27147c08b5b1ac88a2423253024987a1d83544fa;hb=b91c26500777507359a3dd77309a9943226aad0b;hp=250340bf946c4a6adea46a8cb485c6b4a2132d2a;hpb=3fc0f2823c2505b08730286880ad8738963bca17;p=spider.git

diff --git a/perl/Messages b/perl/Messages
index 250340bf..27147c08 100644
--- a/perl/Messages
+++ b/perl/Messages
@@ -91,6 +91,8 @@ package DXM;
 				e31 => '$_[0] is not a user', 
 				e32 => 'Need a passphrase',
 				e33 => '$_[0] is not a number of days or a valid date',
+				e34 => 'Need a GROUP and some text',
+				e35 => 'You are not a member of $_[0], join $_[0]',
 
 				echoon => 'Echoing enabled',
 				echooff => 'Echoing disabled',
@@ -132,11 +134,13 @@ package DXM;
 				isoari => 'there is an input route filter for $_[0]; clear/route input $_[0] first',
 				isoaro => 'there is an output route filter for $_[0]; clear/route $_[0] first',
 				isow => '$_[0] is isolated; unset/isolate $_[0] first',
+				join => 'joining group $_[0]',
 				l1 => 'Sorry $_[0], you are already logged on on another channel',
 				l2 => 'Hello $_[0], this is $main::mycall in $main::myqth\nrunning DXSpider V$main::version build $main::build',
 				lang => 'Language is now English',
 				lange1 => 'set/language <lang> where <lang> is one of ($_[0])',
 				lange2 => 'failed to set language on $_[0]', 
+				leave => 'leaving group $_[0]',
 				lh1 => '$main::data/hop_table.pl doesn\'t exist',
 				loce1 => 'Please enter your location,, set/location <latitude longitude>',
 				loce2 => 'Don\'t recognise \"$_[0]\" as a Lat/Long (eg 52 20 N 0 16 E)',
@@ -231,6 +235,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]\"',
+				qsl1 => 'Call           Manager   Times  Last Time Seen      De',
 				rcmdo => 'RCMD \"$_[0]\" sent to $_[1]',
 				read1 => 'Sorry, no new messages for you',
 				read2 => 'Msg $_[0] not found',
@@ -266,6 +271,7 @@ package DXM;
 				statvhf => 'VHF+ DX Spot Stats, last $_[1] days from $_[0]',
 				statvhft => 'VHF+ DX Spot Stats, last $_[2] days from $_[1] for DXCC $_[0]',
 				statdx => 'Total DX Spots for $_[1] days from $_[0]',
+				storable => 'Please load the Storable module from CPAN', 
 				sun => 'Location                              dd/mm/yyyy Rise   Set',
 				sun_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',
 				susdb1 => 'usage: callsign state city',