From b59ca01e40c511f3d2dd8d86b39724231c572aa1 Mon Sep 17 00:00:00 2001
From: Rob Vermaas <rob.vermaas@gmail.com>
Date: Thu, 10 Feb 2011 10:35:26 +0000
Subject: [PATCH] pass svn/bzr revisions as integers

---
 src/lib/Hydra/Helper/AddBuilds.pm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/lib/Hydra/Helper/AddBuilds.pm b/src/lib/Hydra/Helper/AddBuilds.pm
index 79204250..7181841d 100644
--- a/src/lib/Hydra/Helper/AddBuilds.pm
+++ b/src/lib/Hydra/Helper/AddBuilds.pm
@@ -584,7 +584,7 @@ sub inputsToArgs {
                 when ("boolean") {
                     push @res, "--arg", $input, $alt->{value};
                 }
-                when (["svn", "svn-checkout", "path", "build", "git", "hg", "sysbuild", "bzr", "bzr-checkout"]) {
+                when (["path", "build", "git", "hg", "sysbuild"]) {
                     push @res, "--arg", $input, (
                         "{ outPath = builtins.storePath " . $alt->{storePath} . "" .
                         (defined $alt->{revision} ? "; rev = \"" . $alt->{revision} . "\"" : "") .
@@ -592,6 +592,13 @@ sub inputsToArgs {
                         ";}"
                     );
                 }
+                when (["svn", "svn-checkout", "bzr", "bzr-checkout"]) {
+                    push @res, "--arg", $input, (
+                        "{ outPath = builtins.storePath " . $alt->{storePath} . "" .
+                        (defined $alt->{revision} ? "; rev = " . $alt->{revision} . "" : "") .
+                        ";}"
+                    );
+                }
             }
         }
     }