From 5dd414fbe5c1b9ba5350e007486b5ff8d870fd04 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 30 Jul 2011 10:52:49 +0200 Subject: [PATCH] mercurial: fix date parsing so test suite passes --- IkiWiki/Plugin/mercurial.pm | 11 ++--------- 1 file changed, 2 insertions(+), 9 deletions(-) diff --git a/IkiWiki/Plugin/mercurial.pm b/IkiWiki/Plugin/mercurial.pm index c7f920ab9..b7fe01485 100644 --- a/IkiWiki/Plugin/mercurial.pm +++ b/IkiWiki/Plugin/mercurial.pm @@ -361,15 +361,8 @@ sub findtimes ($$) { print $tmpl_fh 'file = "{file}\\n"' . "\n"; foreach my $line (run_or_die('hg', 'log', '--style', $tmpl_filename)) { - # {date} gives output on the form - # 1310694511.0-7200 - # where the first number is UTC Unix timestamp with one - # decimal (decimal always 0, at least on my system) - # followed by local timezone offset from UTC in - # seconds. - if (! defined $date && $line =~ /^\d+\.\d[+-]\d*$/) { - $line =~ s/^(\d+).*/$1/; - $date=$line; + if (! defined $date && $line =~ /^(\d+)/) { + $date=$1; } elsif (! length $line) { $date=undef; -- 2.39.5