bad localization. My evals did not put variables into the correct

scope.

webtools/tinderbox2/src/bin/processmail_builds

@@ -12,8 +12,8 @@
 # server.  No locks are used by the mail processes, data is passed to
 # the tinderbox server in a maildir like format.
 
-# $Revision: 1.25 $ 
-# $Date: 2002/05/07 20:33:53 $ 
+# $Revision: 1.26 $ 
+# $Date: 2002/05/08 00:39:52 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/bin/processmail_builds,v $ 
 # $Name:  $ 
@@ -860,25 +860,20 @@ sub parse_mail_body {
   # calling the symbolic reference to the function continually.  This
   # is also how we check that the function exists.
 
-    {
-        my ($func) = "Error_Parse::$TINDERBOX{'errorparser'}::line_type";
-        my($func_line_type) = '';
-        
-        my ($out) = eval "\$func_line_type = \\&${func};";
+    my ($out, $func);
 
-        ($@) &&
-            die("Errorparser is not set. $@");
-    }
+    $func = "Error_Parse::$TINDERBOX{'errorparser'}::line_type";
+    $out = eval "\$func_line_type = \\&${func};";
+    ($@) &&
+        die("Errorparser is not set. $@");
 
-    {        
-        my ($func) = "Error_Parse::$TINDERBOX{'errorparser'}::parse_errorline";
-        my ($func_parse_errorline) = "";
-        
-        my ($out) = eval "\$func_parse_errorline = \\&${func};";
-        
-        ($@) &&
-            die("Errorparser is not set. $@");
-    }
+    $func = "Error_Parse::$TINDERBOX{'errorparser'}::parse_errorline";
+    $out = eval "\$func_parse_errorline = \\&${func};";
+    ($@) &&
+        die("Errorparser is not set. $@");
+
+    my $func_line_type = '';
+    my $func_parse_errorline = "";
 
   open(BINARY, ">$TMP_FILE{'binaryfile'}") ||
     die("Could not write to file: '$TMP_FILE{'binaryfile'}'. $!\n");