From c7bf256c204118beb9f207e6f487fc7f53e00a2f Mon Sep 17 00:00:00 2001
From: Andrew Gaffney <agaffney@gentoo.org>
Date: Sat, 5 Jan 2008 04:19:08 +0000
Subject: switch back to Data::Dumper for job output

svn path=/branches/new-fu/; revision=322
---
 server/scireserver.pl | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/server/scireserver.pl b/server/scireserver.pl
index db05d43..ca256bd 100755
--- a/server/scireserver.pl
+++ b/server/scireserver.pl
@@ -8,7 +8,6 @@ use DBI;
 use Data::Dumper;
 use Digest::MD5 qw(md5 md5_hex );
 use File::Path;
-use XML::Dumper;
 
 $| = 1;
 
@@ -253,8 +252,8 @@ sub get_job {
 			or die("Couldn't make $path w/ perms 0660: $!");
 	}
 	open(FH, ">$filename") or die("Couldn't open $filename: $!");
-	my $xml = pl2xml( $job );
-	print FH $xml."\n";
+	my $jobdata = Dumper($job);
+	print FH $jobdata . "\n";
 	close(FH) or die("Couldn't close $filename : $!");
 	debug("OK $filename");
 	return $filename;
-- 
cgit v1.2.3-65-gdbad