Changeset 17760 for trunk/ippScripts/scripts/warp_skycell.pl

Timestamp:

May 20, 2008, 6:24:48 PM (18 years ago)

Author:

bills

Message:

reverting to revision 1.47

File:

• trunk/ippScripts/scripts/warp_skycell.pl (modified) (1 diff)

trunk/ippScripts/scripts/warp_skycell.pl

@@ -120 +120 @@
 
 # Get list of filenames
-my ($imageFile,  $imageName)  = tempfile( $ipprc->file_resolve("$outrootResolved.image.list.XXXX",  "--touch"), UNLINK => !$save_temps);
-my ($maskFile,   $maskName)   = tempfile( $ipprc->file_resolve("$outrootResolved.mask.list.XXXX",   "--touch"), UNLINK => !$save_temps);
-my ($weightFile, $weightName) = tempfile( $ipprc->file_resolve("$outrootResolved.weight.list.XXXX", "--touch"), UNLINK => !$save_temps);
-my ($astromFile, $astromName) = tempfile( $ipprc->file_resolve("$outrootResolved.astrom.list.XXXX", "--touch"), UNLINK => !$save_temps);
+my $outrootResolved = $ipprc->file_resolve( $outroot );
+my ($imageFile,  $imageName)  = tempfile( "$outrootResolved.image.list.XXXX",  UNLINK => !$save_temps);
+my ($maskFile,   $maskName)   = tempfile( "$outrootResolved.mask.list.XXXX",   UNLINK => !$save_temps);
+my ($weightFile, $weightName) = tempfile( "$outrootResolved.weight.list.XXXX", UNLINK => !$save_temps);
+my ($astromFile, $astromName) = tempfile( "$outrootResolved.astrom.list.XXXX", UNLINK => !$save_temps);
 
 my $wrote_astrom = 0;