diff options
author | Jesse Luehrs <doy@tozt.net> | 2010-02-15 03:59:57 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2010-02-15 03:59:57 -0600 |
commit | 04a266ce2ef539369013b5723ddc3912b2e2b03d (patch) | |
tree | 569e797e15bde19a2ff7d82d516e1468929a5574 | |
parent | 8325c4c98879e0d5219efa51e79105338257ae97 (diff) | |
download | crawlbot-04a266ce2ef539369013b5723ddc3912b2e2b03d.tar.gz crawlbot-04a266ce2ef539369013b5723ddc3912b2e2b03d.zip |
last capture here shouldn't be greedy
-rw-r--r-- | lib/Crawl/Bot/Plugin/Commit.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Crawl/Bot/Plugin/Commit.pm b/lib/Crawl/Bot/Plugin/Commit.pm index 2536913..e923baa 100644 --- a/lib/Crawl/Bot/Plugin/Commit.pm +++ b/lib/Crawl/Bot/Plugin/Commit.pm @@ -86,7 +86,7 @@ sub parse_commit { my ($rev) = @_; my $dir = pushd($self->checkout); my $info = `git log -1 --pretty=format:%aN%x00%s%x00%b%x00 $rev`; - $info =~ /(.*?)\x00(.*?)\x00(.*?)\x00(.*?)/s; + $info =~ /(.*?)\x00(.*?)\x00(.*?)\x00(.*)/s; my ($author, $subject, $body, $stat) = ($1, $2, $3, $4); $stat =~ s/(\d+) files changed/$1/; return { |