chiark / gitweb /
suppress seconds and minutes units
[modbot-mtm.git] / xlog / bin / report
index d250717..aef8458 100755 (executable)
@@ -22,7 +22,8 @@ sub processlog ($$) {
        chomp;
        @s= split /\t/;
        push @s, '' if @s<=6;
        chomp;
        @s= split /\t/;
        push @s, '' if @s<=6;
-        $s[0]= strftime "%Y-%m-%d %H:%M:%S %Z", localtime $s[0];
+        $s[0]= strftime "%Y-%m-%d %H:%M %Z", localtime $s[0];
+        $s[0] =~ s/(\d+\:\d)\d/${1}x/;
        &$processline();
        $oddeven =~ y/oe/eo/;
     }
        &$processline();
        $oddeven =~ y/oe/eo/;
     }