From: Akim Demaille <akim@epita.fr>
Date: Sun, 6 Jan 2002 20:47:57 +0000 (+0000)
Subject: * bin/autoscan.in (scan_file): Use `&used'.
X-Git-Tag: AUTOCONF-2.52g~20
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6de8a0df09b401d0550e2ab504f4c1ef1ea84675;p=thirdparty%2Fautoconf.git

* bin/autoscan.in (scan_file): Use `&used'.
---

diff --git a/ChangeLog b/ChangeLog
index 5dd2983b4..4bb1faac4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2002-01-06  Akim Demaille  <akim@epita.fr>
+
+	* bin/autoscan.in (scan_file): Use `&used'.
+
 2002-01-03  Akim Demaille  <akim@epita.fr>
 
 	* doc/autoconf.texi (Output): Improved wording regarding use of
diff --git a/bin/autoscan.in b/bin/autoscan.in
index 06a124d73..3f3fc7666 100644
--- a/bin/autoscan.in
+++ b/bin/autoscan.in
@@ -188,7 +188,7 @@ sub init_tables ()
 
 # used($KIND, $WORD, [$WHERE])
 # ----------------------------
-# $WORD is used in $KIND.
+# $WORD is used as a $KIND.
 sub used ($$;$)
 {
   my ($kind, $word, $where) = @_;
@@ -359,12 +359,12 @@ sub scan_file ()
 
   if (/\.[chlym](\.in)?$/)
     {
-      push (@{$used{'programs'}{"cc"}}, $File::Find::name);
+      used 'programs', 'cc';
       scan_c_file ($_);
     }
   elsif (/\.(cc|cpp|cxx|CC|C|hh|hpp|hxx|HH|H|yy|ypp|ll|lpp)(\.in)?$/)
     {
-      push (@{$used{'programs'}{"c++"}}, $File::Find::name);
+      used 'programs', 'c++';
       scan_c_file ($_);
     }
   elsif (/^[Mm]akefile(\.in)?$/ || /^GNUmakefile(\.in)?$/)
diff --git a/man/autoscan.1 b/man/autoscan.1
index 3064d844e..510689003 100644
--- a/man/autoscan.1
+++ b/man/autoscan.1
@@ -1,5 +1,5 @@
-.\" DO NOT MODIFY THIS FILE!  It was generated by help2man 1.24.
-.TH AUTOSCAN "1" "November 2001" "GNU Autoconf 2.52g" FSF
+.\" DO NOT MODIFY THIS FILE!  It was generated by help2man 1.25.
+.TH AUTOSCAN "1" "January 2002" "autoscan 2.52g" "User Commands"
 .SH NAME
 autoscan \- Generate a preliminary configure.in
 .SH SYNOPSIS