From 9f79481fb42bd82d8a6882c55709c04257a96cd0 Mon Sep 17 00:00:00 2001
From: Alexandre Duret-Lutz <adl@gnu.org>
Date: Mon, 19 Nov 2001 12:32:37 +0000
Subject: [PATCH] * automake.in (scan_texinfo_file): Suppress FIXME about
 strange map behavior.

---
 ChangeLog   | 5 +++++
 automake.in | 3 +--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 5fe41e69..46041b48 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2001-11-19  Alexandre Duret-Lutz  <duret_g@epita.fr>
+
+	* automake.in (scan_texinfo_file): Suppress FIXME about strange
+	map behavior.
+
 2001-11-19  Alexandre Duret-Lutz  <duret_g@epita.fr>
 
 	* tests/defs (aclocaldir): Check for existence of libtool.m4 and
diff --git a/automake.in b/automake.in
index 6e3249d5..d01c8c1d 100755
--- a/automake.in
+++ b/automake.in
@@ -2990,8 +2990,7 @@ sub scan_texinfo_file
 
     my $infobase = basename ($filename);
     $infobase =~ s/\.te?xi(nfo)?$//;
-    # FIXME: I don't understand why, but I can't use "$infobase.$_" => 1.
-    my %clean_files = map { "$infobase" . ".$_" => 1 } @clean_suffixes;
+    my %clean_files = map { +"$infobase.$_" => 1 } @clean_suffixes;
     grep { delete $clean_files{"$infobase.$_"} } @syncodeindexes;
     return ($outfile, $vfile, (sort keys %clean_files));
 }
-- 
2.43.5