Changeset 24222
- Timestamp:
- May 19, 2009, 9:30:20 AM (17 years ago)
- File:
-
- 1 edited
-
trunk/tools/diff_outputs.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/diff_outputs.pl
r24077 r24222 73 73 74 74 # Query to run 75 my $sql = "SELECT path_base FROM diffSkyfileWHERE diff_id = $diff_id AND fault = 0 AND quality = 0";75 my $sql = "SELECT path_base, bothways FROM diffSkyfile JOIN diffRun USING(diff_id) WHERE diff_id = $diff_id AND fault = 0 AND quality = 0"; 76 76 $sql .= " AND skycell_id = '$skycell_id'" if defined $skycell_id; 77 77 … … 83 83 my @products; # Array of products 84 84 if (defined $products) { 85 PRODUCT_SEARCH: foreach my $product ( split /,/, $products) {85 PRODUCT_SEARCH: foreach my $product ( split(/,/, $products) ) { 86 86 foreach my $key ( keys %{PRODUCTS()} ) { 87 87 if ($product eq $key) { … … 93 93 } 94 94 } else { 95 @products = @{${PRODUCTS()}{' REGULAR'}};95 @products = @{${PRODUCTS()}{'ALL'}}; 96 96 } 97 97 98 98 foreach my $diff ( @$diffs ) { 99 99 foreach my $product ( @products ) { 100 next if (not defined $diff->{bothways} or $diff->{bothways} eq 'NULL' or not $diff->{bothways}) and $product =~ /INVERSE/; 100 101 copy_extension( $diff, ${EXTENSIONS()}{$product} ); 101 102 }
Note:
See TracChangeset
for help on using the changeset viewer.
