Get the correct regex for matching a branch with a directory separato…

…r in it.
parrot · Jan 24, 2011 · bdd6fb4 · bdd6fb4
1 parent 9c1655d
commit bdd6fb4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Parrot/Harness/Smoke.pm b/lib/Parrot/Harness/Smoke.pm
@@ -169,7 +169,7 @@ sub collect_test_environment_data {
             $devel .= (" ".@mods." mods");
         }
         my $out = `git branch`;
-        ($branch) = $out =~ m{\* ([/\w+])$}m;
+        ($branch) = $out =~ m{\* ([/\w]+)$}m;
     }
     my $me = $^O eq 'MSWin32' ? $ENV{'USERNAME'}
            : $ENV{'LOGNAME'} || eval { getpwuid($<) };