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

Timestamp:

Aug 20, 2008, 5:10:10 PM (18 years ago)

Author:

Paul Price

Message:

Removing duplicate line.

File:

• trunk/ippScripts/scripts/warp_skycell.pl (modified) (5 diffs)

trunk/ippScripts/scripts/warp_skycell.pl

@@ -33 +33 @@
     '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 +148 @@
     # 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 +157 @@
     if (!$wrote_astrom) {
         print $astromFile "$astrom\n";
-        $wrote_astrom = 1;
+        $wrote_astrom = 1;
     }
 }
@@ -208 +207 @@
     # $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 +258 @@
         # 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;