tyler.durden
/
centreon-plugins
mirror of https://github.com/centreon/centreon-plugins.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

+ fix behave of sanity and warn message!!

This commit is contained in:
garnier-quentin 2016-01-07 17:08:03 +01:00
parent 8d9e3d4b63
commit a2649244af
1 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
centreon/plugins/options.pm
View File

@ -32,6 +32,7 @@ sub new {
my $self = {};
bless $self, $class;
$self->{sanity} = 0;
$self->{options_stored} = {};
$self->{options} = {};
@{$self->{pod_package}} = ();
@ -59,10 +60,8 @@ sub set_sanity {
} else {
$centreon::plugins::alternative::Getopt::warn_message = 1;
}
$SIG{__WARN__} = sub {
$self->{output}->add_option_msg(short_msg => $_[0]);
$self->{output}->option_exit(nolabel => 1);
};
$self->{sanity} == 1;
}
sub set_output {
@ -127,10 +126,21 @@ sub parse_options {
my $self = shift;
#%{$self->{options_stored}} = ();
my $save_warn_handler;
if ($self->{sanity} == 1) {
$save_warn_handler = $SIG{__WARN__};
$SIG{__WARN__} = sub {
$self->{output}->add_option_msg(short_msg => $_[0]);
$self->{output}->option_exit(nolabel => 1);
};
}
GetOptions(
%{$self->{options}}
);
%{$self->{options}} = ();
$SIG{__WARN__} = $save_warn_handler if ($self->{sanity} == 1);
}
sub get_option {