diff options
author | Thomas Guyot-Sionnest <dermoth@aei.ca> | 2012-06-28 22:54:38 -0400 |
---|---|---|
committer | Thomas Guyot-Sionnest <dermoth@aei.ca> | 2012-06-28 22:54:38 -0400 |
commit | e70d62aaf96830a6480b147e6c90c30aeef31a54 (patch) | |
tree | 8fcfa608a5770ec364b2c272d738e22ff72cbc55 /lib/Nagios/Plugin/Getopt.pm | |
parent | bacb16365718f55bbb09f9d990011e3829691f16 (diff) | |
download | monitoring-plugin-perl-e70d62aaf96830a6480b147e6c90c30aeef31a54.tar.gz |
Fix a bug where default file used is not shown
When a default file is used but no section is found (ex. below using
"bad_section"), the plugin dies with:
Invalid section 'bad_section' in config file ''
This patch add a function to Nagios::Plugin::Config that returns the last
used file, and use it to return a file name when we have none.
Diffstat (limited to 'lib/Nagios/Plugin/Getopt.pm')
-rw-r--r-- | lib/Nagios/Plugin/Getopt.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Nagios/Plugin/Getopt.pm b/lib/Nagios/Plugin/Getopt.pm index 6432ee0..f910c4b 100644 --- a/lib/Nagios/Plugin/Getopt.pm +++ b/lib/Nagios/Plugin/Getopt.pm | |||
@@ -249,6 +249,7 @@ sub _load_config_section | |||
249 | # TODO: is this check sane? Does --extra-opts=foo require a [foo] section? | 249 | # TODO: is this check sane? Does --extra-opts=foo require a [foo] section? |
250 | ## Nevertheless, if we die as UNKNOWN here we should do the same on default | 250 | ## Nevertheless, if we die as UNKNOWN here we should do the same on default |
251 | ## file *added eval/_die above*. | 251 | ## file *added eval/_die above*. |
252 | $file ||= $Config->np_getfile(); | ||
252 | $self->_die("Invalid section '$section' in config file '$file'") | 253 | $self->_die("Invalid section '$section' in config file '$file'") |
253 | unless exists $Config->{$section}; | 254 | unless exists $Config->{$section}; |
254 | 255 | ||