Changeset 16063 for trunk/ippScripts/scripts/stack_skycell.pl

Timestamp:

Jan 14, 2008, 4:47:04 PM (18 years ago)

Author:

eugene

Message:

skip the ignored warps

File:

• trunk/ippScripts/scripts/stack_skycell.pl (modified) (2 diffs)

trunk/ippScripts/scripts/stack_skycell.pl

@@ -95 +95 @@
 my $camera;                     # Camera
 foreach my $file (@$files) {
+    # skip warps which are speicified as 'ignored'
+    if ($file->{ignored}) { next; }
     if (defined $tess_id) {
         &my_die("Tesselation identifiers don't match", $stack_id, $PS_EXIT_SYS_ERROR) unless
@@ -123 +125 @@
 # my $inputSources;             # Sources to use as stamps
 foreach my $file (@$files) {
+    if ($file->{ignored}) { next; }
+
     print $listFile "INPUT$num\tMETADATA\n";
     $num++;