Index: trunk/ippScripts/scripts/ipp_mops_translate.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_mops_translate.pl	(revision 17323)
+++ trunk/ippScripts/scripts/ipp_mops_translate.pl	(revision 17520)
@@ -20,4 +20,5 @@
      $skycell,			# Skycell file with WCS
      $output,			# Name of output file
+     $save_temps
      );
 
@@ -27,4 +28,5 @@
 	   'skycell=s' => \$skycell,
 	   'output=s'  => \$output,
+	   'save-temps'        => \$save_temps, # Save temporary files?
 ) or pod2usage( 2 );
 
@@ -262,5 +264,5 @@
 $fits->read_col($yType, $yCol, 1, 1, $numRows, 0, $y, undef, $status) and check_fitsio($status);
 
-my ($coordFile, $coordName) = tempfile( "/tmp/ds9_cmf_regions.XXXX", UNLINK => 1 );
+my ($coordFile, $coordName) = tempfile( "/tmp/ds9_cmf_regions.XXXX", UNLINK => !$save_temps );
 for (my $i = 0; $i < $numRows; $i++) {
     print $coordFile "image; circle(" . ($$x[$i] + 1) . ',' . ($$y[$i] + 1) .