X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=8474275703a9b120acd21c49197e7c791d41c148;hb=d6ff8d0990c60b84a4da6d012f7fc043121e43e8;hp=a0308c562920b96356dd04e65d3813002f54f284;hpb=c32da9acc192ee726e1fad7425990a37ce7eb27f;p=spider.git

diff --git a/perl/Messages b/perl/Messages
index a0308c56..84742757 100644
--- a/perl/Messages
+++ b/perl/Messages
@@ -229,7 +229,7 @@ package DXM;
 				sat1 => 'Tracking Table for $_[0] for the next $_[1] hours every $_[2] mins',
 				sat2 => 'dd/mm  UTC      Lat     Lon  Alt Km      Az      El Dist Km',
 				sat3 => 'Syntax: SH/SAT <name> [<hours> <interval>]',
-				sat4 => 'Satellites available:-',
+				sat4 => 'Satellites available/Age of Keps (days):-',
 				satnf => 'Satellite $_[0] unknown',
 				satdisc => '-----',
 				sethop1 => 'usage: set/hops <call> ann|spots|wwv|wcy <no of hops>',
@@ -264,7 +264,13 @@ package DXM;
 				talknh => 'Sorry $_[0] is not online at the moment',
 				talkprompt => 'Talk ($_[0])>',
 				talkstart => 'Starting talking to you',
+				unsethop1 => 'usage: unset/hops <call> ann|spots|wwv|wcy',
+				unsethop2 => 'hops unset on $_[1] for $_[0]', 
 				usernf => '*** User record for $_[0] not found ***',
+				wcy1 => '$_[0] is missing or out of range',
+				wcy2 => 'Duplicate WCY',
+				wwv1 => '$_[0] is missing or out of range',
+				wwv2 => 'Duplicate WWV',
 				wwvs => 'WWV flag set on $_[0]',
 				wwvu => 'WWV flag unset on $_[0]',
 				wxs => 'WX flag set on $_[0]',
@@ -370,7 +376,7 @@ package DXM;
 		},
   fr => {
 		},
-  sp => {                               
+  es => {                               
 				addr => 'Dirección es ahora: $_[0]',
                  		already => '$_[0] ya esta conectado',
                                 anns => 'Anuncios activados $_[0]',
@@ -641,14 +647,14 @@ package DXM;
 			badnode2 => '$_[0] ist nun ein good node',
 			badnode3 => 'Liste der Bad Nodes:-',
 			bbse1 => 'Bitte die BBS Adresse eingeben,, set/bbs <your bbs address>',
-			bbs => 'Deine BBS Adresse ist nun \"$_[0]\"'
+			bbs => 'Deine BBS Adresse ist nun \"$_[0]\"',
 			beepoff => 'Beeps sind nun aus',
 			beepon => 'Beeps sind nun eingeschaltet',
 			call1 => 'Callsign lookup via $_[0]:',
 			conother => 'Sorry $_[0] Du bist zu mir auf einem anderen Port connected',
 			concluster => 'Sorry $_[0] Du bist schon anderswo in einem Cluster connected (on $_[1])',
 			conscript => 'Kein connect script mit Namen \"$_[0]\" gefunden in $main::root/connect',
-			confail => 'Verbindung zu $_[0] misslungen ($_[1])'
+			confail => 'Verbindung zu $_[0] misslungen ($_[1])',
 			constart => 'Verbindung zu $_[0] gestartet',
 			deluser => 'User $_[0] wurde geloescht',
 			db1 => 'Diese Datenbank ist untergebracht bei $_[0]',
@@ -709,7 +715,7 @@ package DXM;
 			echooff => 'Echo disabled',
 			echow => '*Echo ist im moment disabled, set/echo to enable',
 			emaile1 => 'Bitte email Addresse eingeben, set/email <Deine e-mail Adresse>',
-			emaila => 'Deine E-Mail Adresse ist nun \"$_[0]\"'
+			emaila => 'Deine E-Mail Adresse ist nun \"$_[0]\"',
 			email => 'E-mail Adresse gesetzt auf: $_[0]',
 			export1 => 'Gebrauch: export <msgno> <dateiname>',
 			export2 => '$_[3] has error exporting msg $_[0]to $_[1] ($_[2])',