Просмотр исходного кода

Moving check_file_age into core

git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@578 f882894a-f735-0410-b71e-b25c423dba1c
Ton Voon 22 лет назад
Родитель
Сommit
7d32d2b5f4

+ 1 - 0
plugins-scripts/.cvsignore

@@ -16,3 +16,4 @@ check_oracle
 check_rpc
 check_sensors
 check_wave
+check_file_age

+ 4 - 2
plugins-scripts/Makefile.am

@@ -6,11 +6,13 @@ VPATH=$(top_srcdir) $(top_srcdir)/plugins-scripts $(top_srcdir)/plugins-scripts/
 
 libexec_SCRIPTS = check_breeze check_disk_smb check_flexlm check_ircd \
 	check_log check_ntp check_oracle check_rpc check_sensors check_wave \
-	check_ifstatus check_ifoperstatus check_mailq utils.sh utils.pm
+	check_ifstatus check_ifoperstatus check_mailq check_file_age \
+	utils.sh utils.pm
 
 EXTRA_DIST=check_breeze.pl check_disk_smb.pl check_flexlm.pl check_ircd.pl \
 	check_log.sh check_ntp.pl check_oracle.sh check_rpc.pl check_sensors.sh \
-	check_ifstatus.pl check_ifoperstatus.pl check_wave.pl check_mailq.pl utils.sh.in utils.pm.in t
+	check_ifstatus.pl check_ifoperstatus.pl check_wave.pl check_mailq.pl check_file_age.pl \
+	utils.sh.in utils.pm.in t
 
 TESTS_ENVIRONMENT=perl -I $(top_builddir) -I $(top_srcdir)
 

+ 1 - 1
contrib/check_file_age.pl → plugins-scripts/check_file_age.pl

@@ -27,7 +27,7 @@ use English;
 use Getopt::Long;
 use File::stat;
 use vars qw($PROGNAME);
-use lib utils.pm;
+use lib ".";
 use utils qw (%ERRORS &print_revision &support);
 
 sub print_help ();

+ 1 - 1
plugins-scripts/subst.in

@@ -45,7 +45,7 @@ BEGIN {
 /^#! ?\/.*\/sh/ {sub(/^#! ?\/.*\/sh/,"#! @SHELL@");}
 
 # add to libexecdir to INC for perl utils.pm
-/^use/ { if (/lib/) { if (/utils.pm/ ) {sub(/utils.pm/,led() )} } }
+/^use/ { if (/lib/) { if (/utils.pm|"."/ ) {sub(/utils.pm|"."/,led() )} } }
 
 
 # Trusted path mechanism (deprecated)