From dddb9a281d357b23b65b57bd0b26fd31994374ca Mon Sep 17 00:00:00 2001
From: Rob Vermaas <rob.vermaas@gmail.com>
Date: Tue, 17 Nov 2015 08:36:46 +0000
Subject: [PATCH] Allow dots in job specifier of input type 'Previous build'

---
 src/lib/Hydra/Helper/AddBuilds.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lib/Hydra/Helper/AddBuilds.pm b/src/lib/Hydra/Helper/AddBuilds.pm
index 3a515019..0c4508d7 100644
--- 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; }) \"