increase 0-based month not minutes

diff --git a/lib/WarnColor.pm b/lib/WarnColor.pm
index cdcf14d..14314d8 100644 (file)
--- a/lib/WarnColor.pm
+++ b/lib/WarnColor.pm
@@ -20,7 +20,7 @@ sub BEGIN {
 
                my ( $ss,$mm,$hh, $d,$m,$yyyy ) = localtime(time());
                $yyyy += 1900;
-               $mm   += 1;
+               $m    += 1;
 
                $log .= sprintf("%04d-%02d-%02d.", $yyyy, $m, $d );