X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fsend.pl;h=959a8101e531b957c9c9f364dd8f2397fcdebcbc;hb=a9b7071fedfdb2150f3ef3d74e0d626b4f2dc0ea;hp=a426228500975f3e777cd91f6ae267926dcacd61;hpb=4d3067793942b3f4518615906dde50db5b76464a;p=spider.git

diff --git a/cmd/send.pl b/cmd/send.pl
index a4262285..959a8101 100644
--- a/cmd/send.pl
+++ b/cmd/send.pl
@@ -25,6 +25,9 @@ my $loc;
 if ($self->state eq "prompt") {
 
   my @f = split /\s+/, $line;
+
+  # any thing after send?
+  return (1, $self->msg('e6')) if !@f;
   
   $f[0] = uc $f[0];
   
@@ -93,10 +96,9 @@ if ($self->state eq "prompt") {
   }
   
   # check we have some callsigns
-  if ($i  >  @f) {
+  if ($i  >=  @f) {
     delete $self->{loc};
-    #return (0, $self->msg('esend2'));
-    return (0, "need a callsign");
+	return (1, $self->msg('e6'));
   }
   
   # now save all the 'to' callsigns for later