diff options
author | Brendan Cully <brendan@kublai.com> | 2005-01-17 02:24:49 +0000 |
---|---|---|
committer | Brendan Cully <brendan@kublai.com> | 2005-01-17 02:24:49 +0000 |
commit | 813d73b33c290cd8ce6392d99cd0f83690320c9a (patch) | |
tree | a452ad147c246e4a86368a231eea969b615a3879 /cvslog2changelog.pl | |
parent | d1f8a049952002bdac67c89678f28f85170db60a (diff) |
cvs log emits a timezone after the hour, at least here. Adjust date regexp
to handle that case.
Diffstat (limited to 'cvslog2changelog.pl')
-rw-r--r-- | cvslog2changelog.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cvslog2changelog.pl b/cvslog2changelog.pl index 6f083ef3..1f8b3be0 100644 --- a/cvslog2changelog.pl +++ b/cvslog2changelog.pl @@ -38,11 +38,11 @@ while (<>) { } } elsif ($_ =~ /^revision ([0-9.]*)/) { $change->{revision} = $1; - } elsif ($_ =~ /^date: ([^; ]*) ([^; ]*); author: ([^;]*);/) { + } elsif ($_ =~ /^date: ([^; ]*) ([^; ]*)( \+[0-9]+)?; author: ([^;]*);/) { $change->{date} = $1; $change->{hour} = $2; - $change->{author} = $Authors{$3} ? $Authors{$3} : $3; - $change->{committed} = $3; + $change->{author} = $Authors{$3} ? $Authors{$3} : $4; + $change->{committed} = $4; } elsif ($_ =~ /^From: (.*)$/) { $change->{author} = $1; } elsif ($change->{revision}) { |