Index: trunk/ippScripts/scripts/warp_skycell.pl
===================================================================
--- trunk/ippScripts/scripts/warp_skycell.pl	(revision 19138)
+++ trunk/ippScripts/scripts/warp_skycell.pl	(revision 19147)
@@ -33,5 +33,5 @@
     'dbname|d=s'        => \$dbname, # Database name
     'outroot=s'         => \$outroot, # Output root name
-    'threads=s'       	=> \$threads,   # Number of threads to use for ppImage
+    'threads=s'         => \$threads,   # Number of threads to use for ppImage
     'verbose'           => \$verbose,   # Print to stdout
     'no-update'         => \$no_update, # Don't update the database?
@@ -148,5 +148,4 @@
     # XXX allow an option to use the image header astrometry?
     my $astrom = $ipprc->filename($astromSource, $imfile->{cam_path_base});
-    my $astrom = $ipprc->filename($astromSource, $imfile->{cam_path_base});
 
     &my_die("Couldn't find input file: $astrom", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR) unless defined $astrom and $ipprc->file_exists($astrom);
@@ -158,5 +157,5 @@
     if (!$wrote_astrom) {
         print $astromFile "$astrom\n";
-	$wrote_astrom = 1;
+        $wrote_astrom = 1;
     }
 }
@@ -208,6 +207,6 @@
     # $accept is set above based on the fraction of lit pixels
     # XXX for some files, there may not be enough stars to find a good psf.  these should be dropped as well
-    if ($accept && !$ipprc->file_exists($outputPSF)) { 
-	$accept = 0;
+    if ($accept && !$ipprc->file_exists($outputPSF)) {
+        $accept = 0;
     }
 
@@ -259,8 +258,8 @@
         # XXX change -tess_id to -tess_dir when db is updated
         my $command = "$warptool -addwarped";
-	$command .= " -warp_id $warp_id";
-	$command .= " -skycell_id $skycell_id";
-	$command .= " -tess_id $tess_dir";
-	$command .= " -code $exit_code";
+        $command .= " -warp_id $warp_id";
+        $command .= " -skycell_id $skycell_id";
+        $command .= " -tess_id $tess_dir";
+        $command .= " -code $exit_code";
         $command .= " -path_base $outroot";
         $command .= " -hostname $host" if defined $host;