Index: /trunk/ippScripts/scripts/detrend_reject_exp.pl
===================================================================
--- /trunk/ippScripts/scripts/detrend_reject_exp.pl	(revision 9452)
+++ /trunk/ippScripts/scripts/detrend_reject_exp.pl	(revision 9453)
@@ -117,4 +117,5 @@
     my $command = "$dettool -updateresidexp -det_id $det_id -iteration $iter -exp_tag $expTag"; # Command to run
     my $reject = 0;		# Reject this exposure?
+    my $not_reject = 0;		# Reject this exposure?
     if (not $accept[$i]) {
 	# Rejected this at an earlier stage
@@ -128,5 +129,5 @@
 	    (($means[$i] - $meanStats->mean()) / $meanStats->standard_deviation()) .
 	    " vs " . REJECT_MEAN->{$det_type} . "\n";
-	$reject = 1;
+	$not_reject = 1;
     } elsif (defined REJECT_STDEV->{$det_type} and
 	     defined $stdevStats->standard_deviation() and
@@ -137,5 +138,5 @@
 	    (($stdevs[$i] - $stdevStats->mean()) / $stdevStats->standard_deviation()) .
 	    " vs " . REJECT_STDEV->{$det_type} . "\n";
-	$reject = 1;
+	$not_reject = 1;
     } elsif (defined REJECT_MEAN_STDEV->{$det_type} and
 	     defined $meanStdevStats->standard_deviation() and 
@@ -146,5 +147,5 @@
 	    (($meanStdevs[$i] - $meanStdevStats->mean()) / $meanStdevStats->standard_deviation()) .
 	    " vs " . REJECT_MEAN_STDEV->{$det_type} . "\n";
-	$reject = 1;
+	$not_reject = 1;
     }
     
Index: /trunk/ippScripts/scripts/detrend_reject_imfile.pl
===================================================================
--- /trunk/ippScripts/scripts/detrend_reject_imfile.pl	(revision 9452)
+++ /trunk/ippScripts/scripts/detrend_reject_imfile.pl	(revision 9453)
@@ -166,4 +166,5 @@
     $mean -= EXPECTED_MEAN->{$det_type} if defined EXPECTED_MEAN->{$det_type};
     my $stdev = $stdevs[$i];	# Stdev for this component
+    my $not_reject;
 
     if (defined REJECT_INDIVIDUAL_MEAN->{$det_type}
@@ -172,5 +173,5 @@
 	print "Rejecting exposure based on bad individual mean for component $i: " .
 	    ($mean / $stdev) . " vs " . REJECT_INDIVIDUAL_MEAN->{$det_type} . "\n";
-	$reject = 1;
+	$not_reject = 1;
 	last;
     } elsif (defined REJECT_INDIVIDUAL_STDEV->{$det_type} and
@@ -178,5 +179,5 @@
 	print "Rejecting exposure based on bad individual stdev for component $i: " .
 	    $stdev . " vs " . REJECT_INDIVIDUAL_STDEV->{$det_type} . "\n";
-	$reject = 1;
+	$not_reject = 1;
 	last;
     }
@@ -194,4 +195,5 @@
 }
 my $meanStdev = sqrt($stdevStats->mean()); # Root-Mean-Square of the sample of stdevs
+my $not_reject;
 print "calculating root-mean-square of the sample stdevs: $meanStdev\n";
 if (defined REJECT_SAMPLE_MEAN->{$det_type} and
@@ -200,10 +202,10 @@
     print "Rejecting exposure based on bad mean: " . ($mean / $stdev) . " vs " .
 	REJECT_SAMPLE_MEAN->{$det_type} . "\n";
-    $reject = 1;
+    $not_reject = 1;
 } elsif (defined REJECT_SAMPLE_STDEV->{$det_type} and
 	 $meanStdev > REJECT_SAMPLE_STDEV->{$det_type}) {
     print "Rejecting exposure based on bad mean stdev: " . $meanStdev . " vs " .
 	REJECT_SAMPLE_STDEV->{$det_type} . "\n";
-    $reject = 1;
+    $not_reject = 1;
 }