Changeset 14487

Timestamp:

Aug 14, 2007, 11:25:23 AM (19 years ago)

Author:

Paul Price

Message:

Was adding the 'detrend' flag even though it wasn't!

File:

• trunk/ippScripts/scripts/register_exp.pl (modified) (1 diff)

trunk/ippScripts/scripts/register_exp.pl

@@ -139 +139 @@
 
 # Add the detrend flag, if needed
-foreach my $scienceType (@SCIENCE) {
-    if (lc($exp_type) =~ /$scienceType/) {
-        last;
-    }
-    $command .= " $DETREND_FLAG";
+{
+    my $object = 0;             # Is it an object exposure?
+    foreach my $scienceType (@SCIENCE) {
+        if (lc($exp_type) =~ /$scienceType/) {
+            $object = 1;
+            last;
+        }
+    }
+    $command .= " $DETREND_FLAG" unless $object;
 }