From 57c364222a6947928f4887a1e593d80d7bdd1e74 Mon Sep 17 00:00:00 2001
From: "Andreas J. Koenig" <k@k5.linux.bogus>
Date: Wed, 23 Dec 2009 05:06:16 +0100
Subject: [PATCH] extend the version parsing for fallback_p5 to the
 git_describe that I found in 6155800

---
 lib/CPAN/Testers/ParseReport.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lib/CPAN/Testers/ParseReport.pm b/lib/CPAN/Testers/ParseReport.pm
index fa17619..e3757c2 100644
--- a/lib/CPAN/Testers/ParseReport.pm
+++ b/lib/CPAN/Testers/ParseReport.pm
@@ -606,7 +606,7 @@ sub parse_report {
                     $extract{"meta:writer"} = "CPANPLUS $1";
                 } elsif (/created (?:automatically )?by (\S+)/) {
                     $extract{"meta:writer"} = $1;
-                    if (/\s+on\s+perl\s+(\S+),/) {
+                    if (/\s+on\s+perl\s+([^,]+),/) {
                         $fallback_p5 = $1;
                     }
                 } elsif (/This report was machine-generated by (\S+) (\S+)/) {
@@ -777,7 +777,9 @@ sub parse_report {
         }
     }                           # LINE
     if (! $extract{"meta:perl"} && $fallback_p5) {
-        $extract{"meta:perl"} = $fallback_p5;
+        my($p5,$patch) = split /\s+patch\s+/, $fallback_p5;
+        $extract{"meta:perl"} = $p5;
+        $extract{"conf:git_describe"} = $patch;
     }
     if ($Opt{solve}) {
         $extract{id} = $id;
-- 
2.11.4.GIT