fix for bug 4212: rnetboot -m and rpower -m arguments parsing error

This commit is contained in:
ligc 2013-08-05 17:51:49 +08:00
parent e2ec591723
commit a65455aafd

6
perl-xCAT/xCAT/Utils.pm Normal file → Executable file
View File

@ -2521,6 +2521,12 @@ sub check_deployment_monitoring_settings()
($attr, $val) = split /=~/,$m,2;
$val =~ s/^\///;
$val =~ s/\/$//;
} elsif ($m =~ /^[^=]*!=/) {
($attr, $val) = split /!=/,$m,2;
} elsif ($m =~ /^[^=]*!~/) {
($attr, $val) = split /!~/,$m,2;
$val =~ s/^\///;
$val =~ s/\/$//;
} else {
my $rsp={};
$rsp->{data}->[0] = "Invalid string \"$m\" specified with -m flag";