diff options
Diffstat (limited to 'plugins-scripts/check_ntp.pl')
-rwxr-xr-x | plugins-scripts/check_ntp.pl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/plugins-scripts/check_ntp.pl b/plugins-scripts/check_ntp.pl index 918ad50..9a58d78 100755 --- a/plugins-scripts/check_ntp.pl +++ b/plugins-scripts/check_ntp.pl | |||
@@ -47,7 +47,7 @@ | |||
47 | # source. This happens while starting up and if contact | 47 | # source. This happens while starting up and if contact |
48 | # with master has been lost. | 48 | # with master has been lost. |
49 | # | 49 | # |
50 | # Modifed to run under Embedded Perl - patch from Douglas Warner | 50 | # Modifed to run under Embedded Perl |
51 | # | 51 | # |
52 | 52 | ||
53 | 53 | ||
@@ -56,10 +56,11 @@ use POSIX; | |||
56 | use strict; | 56 | use strict; |
57 | use Getopt::Long; | 57 | use Getopt::Long; |
58 | use vars qw($opt_V $opt_h $opt_H $opt_w $opt_c $verbose $PROGNAME); | 58 | use vars qw($opt_V $opt_h $opt_H $opt_w $opt_c $verbose $PROGNAME); |
59 | use FindBin; | 59 | use lib utils.pm ; |
60 | use lib "$FindBin::Bin"; | ||
61 | use utils qw($TIMEOUT %ERRORS &print_revision &support); | 60 | use utils qw($TIMEOUT %ERRORS &print_revision &support); |
62 | 61 | ||
62 | $PROGNAME="check_ntp"; | ||
63 | |||
63 | sub print_help (); | 64 | sub print_help (); |
64 | sub print_usage (); | 65 | sub print_usage (); |
65 | 66 | ||