X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=df00b3f689840ccd732b402b0270c00bd5a5bdb8;hb=defc60f3e7fab9bb99d1c9f7b8bccc4ec37628d5;hp=250340bf946c4a6adea46a8cb485c6b4a2132d2a;hpb=a7d7ca1d8383bea004544d002748db81d867ea11;p=spider.git

diff --git a/perl/Messages b/perl/Messages
index 250340bf..df00b3f6 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)',