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 918ad504..9a58d78a 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 | ||
