From 95e1de8b4a66a860cd4e26e7cd6937d8e93203fb Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Wed, 29 Dec 2021 10:34:18 +0000 Subject: [PATCH] fix wcy logger position on print --- perl/WCY.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/WCY.pm b/perl/WCY.pm index 50476886..1df87e80 100644 --- a/perl/WCY.pm +++ b/perl/WCY.pm @@ -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]); } -- 2.34.1