X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2Fimportkeps.pl;h=aeea441566a58eb537dc517d7f50133931a8af92;hb=ba1a144ec12c8265b96cf42b0218fd5bd2703e91;hp=427871673d5398952d57e145d9448390cd2e8ae0;hpb=8216591f8355cc88b277c25a854527408bce8a3d;p=spider.git

diff --git a/perl/importkeps.pl b/perl/importkeps.pl
index 42787167..aeea4415 100644
--- a/perl/importkeps.pl
+++ b/perl/importkeps.pl
@@ -48,7 +48,7 @@ sub process
 	return unless $inp =~ s/2Line\s+Orbital\s+Elements/2Line Keps/;
 	
 	# open the output file in the data area
-	my $fn = "$root/data/keps.txt.$$";
+	my $fn = "$root/tmp/keps.txt.$$";
 	open OUT, ">$fn" or die "$fn $!";
 	print OUT $inp;
 	close OUT;