fix wcy logger position on print
authorDirk Koopman <djk@tobit.co.uk>
Wed, 29 Dec 2021 10:34:18 +0000 (10:34 +0000)
committerDirk Koopman <djk@tobit.co.uk>
Wed, 29 Dec 2021 10:34:18 +0000 (10:34 +0000)
perl/WCY.pm

index 504768860717204fc0f70814b6f1ca7e55c6ab8b..1df87e802b907d56e237d3d61686e8052cf6761b 100644 (file)
@@ -229,7 +229,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 %6s <%s>", 
+       return sprintf("$d   %02d %5d %3d %3d   %3d %3d %-5s %-5s %6s   <%s>", 
                                    $t, @$r[1..9]);
 }