# check for callsign
return (1, $self->msg('e5')) if $self->priv < 5;
return (1, $self->msg('e12')) if !$f[0];
+return (1, $self->msg('e11')) if $call eq $main::mycall;
my $call = uc $f[0];
my $ref = DXCluster->get_exact($call);
return (1, $self->msg('e13', $call)) unless $ref->isa('DXNode');
-my ($spots, $wwv) = $f[1] =~ m{(\d+/\d+)} if $f[1];
+my ($spots, $wwv) = $f[1] =~ m{(\d+)/(\d+)} if $f[1];
$spots = 10 unless $spots;
$wwv = 5 unless $wwv;