From b87bc28e1c9b414bef1566c836df38e128027c0f Mon Sep 17 00:00:00 2001 From: zhaoertao Date: Mon, 18 Jul 2011 08:34:26 +0000 Subject: [PATCH] fix bugs item 3366218 git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10105 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/FSPconn.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/FSPconn.pm b/perl-xCAT/xCAT/FSPconn.pm index 1bb6cb2e3..53e67b64a 100644 --- a/perl-xCAT/xCAT/FSPconn.pm +++ b/perl-xCAT/xCAT/FSPconn.pm @@ -78,7 +78,7 @@ sub mkhwconn_parse_args return( usage('Flags -t and -p cannot be used together.')); } - if ( exists $opt{P} and ! exists $opt{p}) + if ( (exists $opt{P} or grep(/^(-P)$/, @$args)) and !exists $opt{p}) { return( usage('Flags -P can only be used when flag -p is specified.')); }