1 files 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;