From: Tom Tromey <tromey@redhat.com>
Date: Tue, 2 Jun 1998 19:36:04 +0000 (+0000)
Subject: perl4 fixlet
X-Git-Tag: Release-1-3b~17
X-Git-Url: https://sourceware.org/git/?a=commitdiff_plain;h=ed5179da2f517194f4cdb437e41b2e6159c99109;p=automake.git

perl4 fixlet
---

diff --git a/ChangeLog b/ChangeLog
index fc844c51..70a957f7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 Tue Jun  2 13:27:34 1998  Tom Tromey  <tromey@cygnus.com>
 
+	* automake.in (scan_one_configure_file): Make CONFIGURE file
+	handle local.
+
 	* automake.in (read_am_file): Error if blank line or comment
 	follows trailing backslash.  Test syntax.test.
 	(file_contents_with_transform): Likewise.
diff --git a/automake.in b/automake.in
index a91bf463..73fcb5c9 100755
--- a/automake.in
+++ b/automake.in
@@ -295,7 +295,7 @@ if ($generate_deps)
     die "automake: Must provide --srcdir-name when generating\n"
       if (!$srcdir_name);
 
-    open(GDEP, ">$output_directory/.dep_segment")
+    open (GDEP, ">$output_directory/.dep_segment")
       || die "automake: Could not open `$output_directory/.dep_segment': $!\n";
 
     &handle_dependencies;
@@ -4024,6 +4024,7 @@ sub handle_minor_options
 sub scan_one_configure_file
 {
     local ($filename) = @_;
+    local (*CONFIGURE);
 
     open (CONFIGURE, $filename)
 	|| die "automake: couldn't open \`$filename': $!\n";