X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FSpot.pm;h=d5b5adf93994ef4aa6f5fba77689268feff524c3;hp=fee069a2d7a9ea9867d32a20da6a9c39b1703bf9;hb=b5b58db69484da5554b4f7e10b813d13e8cf16cb;hpb=57b5e464bc44ae8eee23ab94c1f499f527595dc9 diff --git a/perl/Spot.pm b/perl/Spot.pm index fee069a2..d5b5adf9 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -184,7 +184,7 @@ sub formatb { my @dx = @_; my $t = ztime($dx[2]); - return sprintf "DX de %-9.9s: %9.1f %-12s %-30s<%s>", $dx[4], $dx[0], $dx[1], $dx[3], $t ; + return sprintf "DX de %-7.7s: %13.1f %-12.12s %-30s<%s>", $dx[4], $dx[0], $dx[1], $dx[3], $t ; } # format a spot for user output in list mode