From f6fd756134fdacbae44f3c5adcfb9383325babe4 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Thu, 5 Mar 2009 12:32:14 +0000
Subject: [PATCH]

---
 src/Hydra/script/hydra_scheduler.pl | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/Hydra/script/hydra_scheduler.pl b/src/Hydra/script/hydra_scheduler.pl
index da766301..1e1de9ec 100755
--- a/src/Hydra/script/hydra_scheduler.pl
+++ b/src/Hydra/script/hydra_scheduler.pl
@@ -442,6 +442,16 @@ sub checkJobs {
 }
 
 
+# For testing: evaluate a single jobset, then exit.
+if (scalar @ARGV == 2) {
+    my $projectName = $ARGV[0];
+    my $jobsetName = $ARGV[1];
+    my $jobset = $db->resultset('Jobsets')->find($projectName, $jobsetName) or die;
+    checkJobSet($jobset->project, $jobset);
+    exit 0;
+}
+
+
 while (1) {
     checkJobs;
     print "sleeping...\n";