X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=e2be0e3fa36536ca68063854c1e5395f0159e5ae;hb=7bba989c01312790704a42153bbd87bcbb3f084e;hp=0bd8bd2853340ca0108aee4c77bba719eee2cdac;hpb=28adf81497391e90c2c46201f7f3bc23986251fb;p=spider.git

diff --git a/perl/Messages b/perl/Messages
index 0bd8bd28..e2be0e3f 100644
--- a/perl/Messages
+++ b/perl/Messages
@@ -104,6 +104,11 @@ package DXM;
 				shutting => '$main::mycall shutting down...',
 				sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
 				sqra => 'Cluster QRA Locator$_[0], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
+				sorry => 'Sorry',
+				suser1 => 'usage: callsign user_field_name value',
+				suser2 => 'User $_[0] not found',
+				suser3 => 'User field \'$_[0]\' was \'$_[1]\' now set to \'$_[2]\'',
+				suser4 => 'User field name \'$_[0]\' doesn\'t exist',
 				talks => 'Talk flag set on $_[0]',
 				talku => 'Talk flag unset on $_[0]',
 				usernf => '*** User record for $_[0] not found ***',