* autoscan.pl ($dir, $autoconf): New.

diff --git a/ChangeLog b/ChangeLog
index e43a7a6c4a6653c7c2efb65d98b0351b15da205d..43419e53b1157d292fe2b80e424945bf41c9c74d 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-22  Akim Demaille  <akim@epita.fr>
+
+       * autoscan.pl ($dir, $autoconf): New.
+
 2001-01-22  Akim Demaille  <akim@epita.fr>
 
        * autoscan.pl ($headers, $functions, $identifiers, $libraries):

diff --git a/autoscan.in b/autoscan.in
index 33cc63e35c8f7e235507afbf1704efc12e770a17..d488c9081b3d5e3ab28ce154bccf35835878776f 100644 (file)
--- a/autoscan.in
+++ b/autoscan.in
@@ -22,7 +22,24 @@
 require "find.pl";
 use Getopt::Long;
 
+# Find the lib files and autoconf.
 $datadir = $ENV{"AC_MACRODIR"} || "@datadir@";
+($dir = $0) =~ s,[^/]*$,,;
+$autoconf = '';
+# We test "$dir/autoconf" in case we are in the build tree, in which case
+# the names are not transformed yet.
+foreach $file ("$ENV{AUTOCONF}" || '',
+              "$dir/@autoconf-name@",
+              "$dir/autoconf",
+              "@bindir@/@autoconf-name@")
+  {
+    if (-f $file)
+      {
+       $autoconf = $file;
+       last;
+      }
+  }
+
 ($me = $0) =~ s,.*/,,;
 $verbose = 0;
 
@@ -538,7 +555,7 @@ sub check_configure_ac
       $trace_option .= " -t $macro";
     }
 
-  open (TRACES, "/home/akim/src/ace/autoconf -A $datadir $trace_option $configure_ac|") ||
+  open (TRACES, "$autoconf -A $datadir $trace_option $configure_ac|") ||
     die "$me: cannot create read traces: $!\n";
 
   while (<TRACES>)

diff --git a/autoscan.pl b/autoscan.pl
index 33cc63e35c8f7e235507afbf1704efc12e770a17..d488c9081b3d5e3ab28ce154bccf35835878776f 100644 (file)
--- a/autoscan.pl
+++ b/autoscan.pl
@@ -22,7 +22,24 @@
 require "find.pl";
 use Getopt::Long;
 
+# Find the lib files and autoconf.
 $datadir = $ENV{"AC_MACRODIR"} || "@datadir@";
+($dir = $0) =~ s,[^/]*$,,;
+$autoconf = '';
+# We test "$dir/autoconf" in case we are in the build tree, in which case
+# the names are not transformed yet.
+foreach $file ("$ENV{AUTOCONF}" || '',
+              "$dir/@autoconf-name@",
+              "$dir/autoconf",
+              "@bindir@/@autoconf-name@")
+  {
+    if (-f $file)
+      {
+       $autoconf = $file;
+       last;
+      }
+  }
+
 ($me = $0) =~ s,.*/,,;
 $verbose = 0;
 
@@ -538,7 +555,7 @@ sub check_configure_ac
       $trace_option .= " -t $macro";
     }
 
-  open (TRACES, "/home/akim/src/ace/autoconf -A $datadir $trace_option $configure_ac|") ||
+  open (TRACES, "$autoconf -A $datadir $trace_option $configure_ac|") ||
     die "$me: cannot create read traces: $!\n";
 
   while (<TRACES>)

diff --git a/bin/autoscan.in b/bin/autoscan.in
index 33cc63e35c8f7e235507afbf1704efc12e770a17..d488c9081b3d5e3ab28ce154bccf35835878776f 100644 (file)
--- a/bin/autoscan.in
+++ b/bin/autoscan.in
@@ -22,7 +22,24 @@
 require "find.pl";
 use Getopt::Long;
 
+# Find the lib files and autoconf.
 $datadir = $ENV{"AC_MACRODIR"} || "@datadir@";
+($dir = $0) =~ s,[^/]*$,,;
+$autoconf = '';
+# We test "$dir/autoconf" in case we are in the build tree, in which case
+# the names are not transformed yet.
+foreach $file ("$ENV{AUTOCONF}" || '',
+              "$dir/@autoconf-name@",
+              "$dir/autoconf",
+              "@bindir@/@autoconf-name@")
+  {
+    if (-f $file)
+      {
+       $autoconf = $file;
+       last;
+      }
+  }
+
 ($me = $0) =~ s,.*/,,;
 $verbose = 0;
 
@@ -538,7 +555,7 @@ sub check_configure_ac
       $trace_option .= " -t $macro";
     }
 
-  open (TRACES, "/home/akim/src/ace/autoconf -A $datadir $trace_option $configure_ac|") ||
+  open (TRACES, "$autoconf -A $datadir $trace_option $configure_ac|") ||
     die "$me: cannot create read traces: $!\n";
 
   while (<TRACES>)