inline-source: DO NOT EDIT warning only for top-level file.

* gl/build-aux/inline-source (func_include): When recursing, pass
through the value of `magic` so that only the very first #! magic
number has a DO NOT EDIT warning injected.
* bootstrap: Regenerate.

Signed-off-by: Gary V. Vaughan <gary@gnu.org>
This commit is contained in:
Gary V. Vaughan 2014-01-04 11:43:58 +13:00
parent da59d47a44
commit b1a09dfa0d
2 changed files with 3 additions and 7 deletions

View File

@ -1533,8 +1533,6 @@ func_lt_ver ()
# time-stamp-time-zone: "UTC"
# End:
#! /bin/sh
## DO NOT EDIT - This file generated from build-aux/options-parser
## by inline-source v2014-01-03.01
# Set a version string for this script.
scriptversion=2014-01-03.01; # UTC
@ -2143,8 +2141,6 @@ func_version ()
# time-stamp-time-zone: "UTC"
# End:
#! /bin/sh
## DO NOT EDIT - This file generated from build-aux/extract-trace
## by inline-source v2014-01-03.01
# Extract macro arguments from autotools input with GNU M4.
# Written by Gary V. Vaughan, 2010

View File

@ -124,7 +124,7 @@ func_include ()
test -n "$_G_scriptdir" || _G_scriptdir="./"
$AWK '
BEGIN { magic = 0; }
BEGIN { magic = '${_RECURSE_MAGIC-0}'; }
/^#!/ && magic == 0 {
print $0;
@ -136,14 +136,14 @@ func_include ()
/^\. ['\''"].*['\''"]$/ {
file = substr ($2, 2, length ($2) -2);
system (sprintf ("'$progpath' %s", file));
system (sprintf ("env _RECURSE_MAGIC=%d '$progpath' %s", magic, file));
next;
}
/^\. `echo [^`]*`['\''"][^'\''"]*['\''"]$/ {
tail = substr ($0, match ($0, /`['\''"]/));
file = substr (tail, 3, length (tail) -3);
system (sprintf ("'$progpath' '"$_G_scriptdir"'%s", file));
system (sprintf ("env _RECURSE_MAGIC=%d '$progpath' '"$_G_scriptdir"'%s", magic, file));
next;
}