[v9_8] bugfix in contrib/check5011.pl

diff --git a/contrib/check5011.pl b/contrib/check5011.pl
index 70d873a087d7a3db44e65316de2c78052c9ae807..5306e8bfb26dda9c6a3ca6d9b63bf1008fcc2ff8 100644 (file)
--- a/contrib/check5011.pl
+++ b/contrib/check5011.pl
@@ -9,7 +9,7 @@ my $now = strftime "%Y%m%d%H%M%S", gmtime;
 sub ext8601 ($) {
        my $d = shift;
        $d =~ s{(....)(..)(..)(..)(..)(..)}
-              {$1-$2-$3.$4:$5:$6};
+              {$1-$2-$3.$4:$5:$6+0000};
        return $d;
 }