Changeset 11151 for trunk/ippScripts/scripts/detrend_stack.pl

Timestamp:

Jan 18, 2007, 6:26:04 PM (19 years ago)

Author:

Paul Price

Message:

Trying to make detrend type non-case sensitive.

File:

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

trunk/ippScripts/scripts/detrend_stack.pl

@@ -50 +50 @@
     };
 
-die "Unrecognised detrend type: $det_type\n" if not defined RECIPES()->{$det_type};
-my $recipe = RECIPES()->{$det_type}; # Recipe to use in stacking
+my $recipe = RECIPES()->{lc($det_type)}; # Recipe to use in stacking
+die "Unrecognised detrend type: $det_type\n" if not defined $recipe;
 
 # Look for programs we need