1. fixed a problem with DXLogPrint repeating log entries.

[spider.git] / perl / Messages

diff --git a/perl/Messages b/perl/Messages
index 0bd8bd2853340ca0108aee4c77bba719eee2cdac..956778bf7f7e6852204600fd742d8a6cd0ffe41f 100644 (file)
--- a/perl/Messages
+++ b/perl/Messages
@@ -54,6 +54,7 @@ package DXM;
                                hnodee1 => 'Please enter your Home Node, set/homenode <your home DX Cluster>',
                                hnodee2 => 'Failed to set homenode on $_[0]',
                                hnode => 'Your Homenode is now \"$_[0]\"',
+                               init1 => 'sent initialisation message to $_[0]',
                                iso => '$_[0] Isolated',
                                isou => '$_[0] UnIsolated',
                                isoc => '$_[0] created and Isolated',
@@ -104,6 +105,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 ***',