altered wcy display a bit

[spider.git] / perl / WCY.pm

diff --git a/perl/WCY.pm b/perl/WCY.pm
index f3202dd4c7451dbe536385dd20a672bccffc37a2..06f41d2d9d394cc0348ea932977390d6c171d05e 100644 (file)
--- a/perl/WCY.pm
+++ b/perl/WCY.pm
@@ -195,7 +195,7 @@ sub print_item
        my $d = cldate($r->[0]);
        my $t = (gmtime($r->[0]))[2];
 
-       return sprintf("$d   %02d %5d %3d %3d   %3d %3d %-5s %-5s     %-3s <%s>", 
+       return sprintf("$d   %02d %5d %3d %3d   %3d %3d %-5s %-5s  %6s <%s>", 
                                    $t, @$r[1..9]);
 }