Allow dots in job specifier of input type 'Previous build'

2015-11-17 08:36:46 +00:00 · 2015-11-17 08:36:46 +00:00 · dddb9a281d
parent b6d2c6f03a
commit dddb9a281d
1 changed files with 1 additions and 1 deletions
--- a/src/lib/Hydra/Helper/AddBuilds.pm
+++ b/src/lib/Hydra/Helper/AddBuilds.pm
@ -34,7 +34,7 @@ sub parseJobName {
    our $key;
    our %attrs = ();
    # hm, maybe I should stop programming Perl before it's too late...
-    $s =~ / ^ (?: (?: ([\w\-]+) : )? ([\w\-]+) : )? ([\w\-\.]+) \s*
+    $s =~ / ^ (?: (?: ([\w\-]+) : )? ([\w\-\.]+) : )? ([\w\-\.]+) \s*
            (\[ \s* (
              ([\w]+) (?{ $key = $^N; }) \s* = \s* \"
              ([\w\-]+) (?{ $attrs{$key} = $^N; }) \"