X-Git-Url: https://git.distorted.org.uk/~mdw/cfd/blobdiff_plain/c7b7fe2fe0a2f511ae78cf7f3b91f1db791dd550..282625e1b87743236f1cb8c70c2762edd413c6b0:/install-ac diff --git a/install-ac b/install-ac index 07de7dc..b10dadd 100755 --- a/install-ac +++ b/install-ac @@ -12,10 +12,10 @@ case $mode in printf "Uninstalling aclocal fragments... " awk -v dir="$dir" ' /\*@-([a-zA-Z0-9][-a-zA-Z0-9_]*)-@\*/ { - out = $0; - sub(/^.*\*@-/, "", out); - sub(/-@\*.*$/, "", out); - system(sprintf("rm %s/%s.m4", dir, out)); + out = $0; + sub(/^.*\*@-/, "", out); + sub(/-@\*.*$/, "", out); + system(sprintf("rm %s/%s.m4", dir, out)); }' <"$glob" echo "done." ;; @@ -24,30 +24,30 @@ case $mode in awk -v dir="$dir" ' BEGIN { out = ""; delete files; notice = ""} /\*@--NOTICE--@\*/ { - if (out != "") close(out); - out = "NOTICE"; - notice = $0 "\n"; - next; + if (out != "") close(out); + out = "NOTICE"; + notice = $0 "\n"; + next; } /\*@-([a-zA-Z0-9][-a-zA-Z0-9_]*)-@\*/ { - if (out != "") close(out); - out = $0; - sub(/^.*\*@-/, "", out); - sub(/-@\*.*$/, "", out); - files[out] = 1; - out = sprintf("%s/%s.new", dir, out); - printf "%s", notice >(out); + if (out != "") close(out); + out = $0; + sub(/^.*\*@-/, "", out); + sub(/-@\*.*$/, "", out); + files[out] = 1; + out = sprintf("%s/%s.new", dir, out); + printf "%s", notice >(out); } /\*@--[-a-zA-Z0-9_]*-@\*/ { next; } { - if (out == "NOTICE") - notice = notice $0 "\n"; - else - if (out != "") print $0 >(out); + if (out == "NOTICE") + notice = notice $0 "\n"; + else + if (out != "") print $0 >(out); } END { - for (f in files) - system(sprintf("mv %s/%s.new %s/%s.m4", dir, f, dir, f)); + for (f in files) + system(sprintf("mv %s/%s.new %s/%s.m4", dir, f, dir, f)); }' <"$glob" echo "done." ;;