From: Akim Demaille <akim@epita.fr>
Date: Thu, 29 Aug 2002 08:13:24 +0000 (+0000)
Subject: * bin/autom4te.in (Request::load): Correctly test for "do" read
X-Git-Tag: AUTOCONF-2.53c~31
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bf0ec7678afe09ea5bd5660fb08bb5da0da42b51;p=thirdparty%2Fautoconf.git

* bin/autom4te.in (Request::load): Correctly test for "do" read
failure.
---

diff --git a/ChangeLog b/ChangeLog
index 2b7f26542..5f77ebd10 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2002-08-29  Rainer Orth  <ro@TechFak.Uni-Bielefeld.DE>
+
+	* bin/autom4te.in (Request::load): Correctly test for "do" read
+	failure.
+
 2002-08-29  Akim Demaille  <akim@epita.fr>
 
 	* lib/Autom4te/General.pm (&xqx): New.
diff --git a/bin/autom4te.in b/bin/autom4te.in
index 75174f44a..26b68e29f 100644
--- a/bin/autom4te.in
+++ b/bin/autom4te.in
@@ -214,7 +214,7 @@ sub load
   (my $return) = do "$file";
 
   croak "$me: cannot parse $file: $@\n" if $@;
-  croak "$me: cannot do $file: $!\n"    if $!;
+  croak "$me: cannot do $file: $!\n"    unless defined $return;
   croak "$me: cannot run $file\n"       unless $return;
 }