Recheckin due to misapplied patch for bug 123957

164042b8 · bugreport%peshkin.net · e37bab52 · 164042b8
Commit 164042b8 authored Sep 01, 2002 by bugreport%peshkin.net
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

checksetup.pl checksetup.pl +2 -2

No files found.
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -322,8 +322,8 @@ print "Checking user setup ...\n";
 $@ = undef;
 if ($ARGV[0]) {
    do $ARGV[0] 
-        or eval die("Error $! processing $ARGV[0]")
-        or die("Error $@ processing $ARGV[0]");
+        or ($@ && die("Error $@ processing $ARGV[0]"))
+        or die("Error $! processing $ARGV[0]");
 }
 do 'localconfig';
 if ($@) { # capture errors in localconfig, bug 97290