diff options
author | Ralf Wildenhues <Ralf.Wildenhues@gmx.de> | 2007-11-26 19:40:50 +0100 |
---|---|---|
committer | Ralf Wildenhues <Ralf.Wildenhues@gmx.de> | 2007-11-26 19:40:50 +0100 |
commit | 952adbf38941fb36b345aa4efb861fa8efd9f2e5 (patch) | |
tree | 7b0517ea8fab7ecd4c7510a8695a01d8d81e0fef /bin | |
parent | ee28883f0eb709933bad58b4b84575210c3fd939 (diff) | |
download | autoconf-952adbf38941fb36b345aa4efb861fa8efd9f2e5.tar.gz |
Fix autom4te for unusual characters in input file names.
* bin/autom4te.in (files_to_options): Quote active characters
for the shell.
* tests/tools.at (autom4te and white space in file names):
New test.
Diffstat (limited to 'bin')
-rw-r--r-- | bin/autom4te.in | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/bin/autom4te.in b/bin/autom4te.in index 19bb9647..b273b9a0 100644 --- a/bin/autom4te.in +++ b/bin/autom4te.in @@ -235,14 +235,16 @@ sub files_to_options (@) my @res; foreach my $file (@file) { + (my $arg = $file) =~ s/'/'\\''/g; if ($file =~ /\.m4f$/) { - push @res, "--reload-state=$file"; + $arg = "--reload-state=$file"; } - else + if ($file =~ /[\t "'\\\$()]/) { - push @res, $file; + $arg = "'$arg'"; } + push @res, $arg; } return join ' ', @res; } |