index cc0fd1b6442c3bff2c8ba5443ff286f7c61adf40..7e38e027e5c36e41a1055d2aeee7a88164eacb4e 100644 (file)
--- a/plugins-scripts/subst.in
+++ b/plugins-scripts/subst.in
return c;
}
+# used to replace "use lib utils.pm" with "use lib @libexecdir"
+#
+function led() {
+ led1 = "@libexecdir@";
+ led2 = "@exec_prefix@";
+ led3 = "@prefix@";
+ if ( match(led1, /^\$\{exec_prefix\}/ ) != 0 ) {
+ return "\"" led3 "/libexec\" " ;
+
+ }
+ return "\"" led1 "\"" ;
+}
+
BEGIN {
split(ENVIRON["PATH"] ":/sbin:/usr/sbin",path,/:/);
+
}
# scripting language (first line)
/^#! ?\/.*\/[a-z]{0,2}awk/ {sub(/^#! ?\/.*\/[a-z]{0,2}awk/,"#! @AWK@");}
/^#! ?\/.*\/sh/ {sub(/^#! ?\/.*\/sh/,"#! @SHELL@");}
+# add to libexecdir to INC for perl utils.pm
+/^use/ { if (/lib/) { if (/utils.pm/ ) {sub(/utils.pm/,led() )} } }
+
+
# Trusted path mechanism (deprecated)
/^[ \t]*\$ENV[ \t]*\{[ \t'"]*PATH[ \t"']*\}[ \t]*=/ {
- sub(/\=[ \t]*['"][^"']+["']/,"='@trusted_path@' # autoconf-derived");
+ sub(/\=[ \t]*['"][^"']+["']/,"='@with_trusted_path@' # autoconf-derived");
}
/^[\t ]*(export[\t ]*)?PATH[\t ]*=['"]+.+["']$/ {
- sub(/\=.*$/,"='@trusted_path@' # autoconf-derived");
+ sub(/\=.*$/,"='@with_trusted_path@' # autoconf-derived");
}
# Specific programs