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 3e1316d9a6
commit e48e3b1c1a

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

@ -2552,6 +2552,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";