diff options
| -rw-r--r-- | plugins-scripts/subst.in | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/plugins-scripts/subst.in b/plugins-scripts/subst.in index cc0fd1b6..9140157b 100644 --- a/plugins-scripts/subst.in +++ b/plugins-scripts/subst.in @@ -19,8 +19,22 @@ function which(c,path) { 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) @@ -30,6 +44,10 @@ BEGIN { /^#! ?\/.*\/[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]*=/ { |