[monitoring-plugins] subst.in: remove the led() function

[Jan Wagner]

    Module: monitoring-plugins
    Branch: master
    Commit: 2d49468a2533c4623d4121ee0e12260bcba78905
    Author: Evgeni Golov <evgeni at golov.de>
 Committer: Jan Wagner <waja at cyconet.org>
      Date: Wed Feb 26 08:38:46 2014 +0100
       URL: https://www.monitoring-plugins.org/repositories/monitoring-plugins/commit/?id=2d49468

subst.in: remove the led() function

It was only used to replace the 'use lib utils.pm' with the proper
libexec dir, which is now solved by using Perl's FinBin.

Closes #1241

---

 plugins-scripts/subst.in | 17 -----------------
 1 file changed, 17 deletions(-)

diff --git a/plugins-scripts/subst.in b/plugins-scripts/subst.in
index a70ad88..66777d7 100644
--- a/plugins-scripts/subst.in
+++ b/plugins-scripts/subst.in
@@ -19,19 +19,6 @@ 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,/:/);
 
@@ -58,10 +45,6 @@ BEGIN {
 	sub(c,which(c,path));
 }
 
-# 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]*=/ {