summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Gaffney <agaffney@gentoo.org>2008-01-02 02:12:24 +0000
committerAndrew Gaffney <agaffney@gentoo.org>2008-01-02 02:12:24 +0000
commit15e7118dbd275fd3350435c2c049257630ceea38 (patch)
tree224f3829d95f09d4effdea4483895709578af1ed
parentfixed get_jobs. (diff)
downloadscire-15e7118dbd275fd3350435c2c049257630ceea38.tar.gz
scire-15e7118dbd275fd3350435c2c049257630ceea38.tar.bz2
scire-15e7118dbd275fd3350435c2c049257630ceea38.zip
return job filename and print it
svn path=/branches/new-fu/; revision=312
-rwxr-xr-xserver/scireserver.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/server/scireserver.pl b/server/scireserver.pl
index 8e49ee7..9e20154 100755
--- a/server/scireserver.pl
+++ b/server/scireserver.pl
@@ -81,8 +81,8 @@ while(<>) {
print "OK " . join(",", @jobs) . "\n";
} elsif ($command eq "GET_JOB") {
my $job = $args[0];
- get_job($job);
-
+ my $jobfile = get_job($job);
+ print "OK ${jobfile}\n";
} elsif ($command eq "SET_JOB_STATUS") {
my ($jobid,$status) = @args;
set_job_status($jobid,$status);
@@ -253,7 +253,7 @@ sub get_job {
# print FH $xml."\n";
# close(FH) or die("Couldn't close $filename : $!");
debug("OK $filename\n");
- return "OK $filename\n";
+ return $filename;
}
sub set_job_status {