From e48e3b1c1a3155474c64070d7d9e58ad68fb4ce3 Mon Sep 17 00:00:00 2001 From: ligc Date: Mon, 5 Aug 2013 17:51:49 +0800 Subject: [PATCH] fix for bug 4212: rnetboot -m and rpower -m arguments parsing error --- perl-xCAT/xCAT/Utils.pm | 6 ++++++ 1 file changed, 6 insertions(+) mode change 100644 => 100755 perl-xCAT/xCAT/Utils.pm diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm old mode 100644 new mode 100755 index 1180656e2..b2dfd63d6 --- a/perl-xCAT/xCAT/Utils.pm +++ b/perl-xCAT/xCAT/Utils.pm @@ -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";