bug id ID: 3033398 - several commands do not support long options such as --force

use getopt instead of getopts to let long options pass through

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6835 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
sjing 2010-07-23 09:09:38 +00:00
parent 2fbb9469d9
commit f43e891300

View File

@ -99,7 +99,8 @@ foreach my $a (@ARGV)
my @checkcmds = ("nimnodeset", "mkdsklsnode", "rmdsklsnode", "xcat2nim", "nimnodecust");
if (grep(/^$bname$/, @checkcmds) ) {
# strip off all options
getopts('ab:d:Dfh?i:lurs:m:no:t:vVp:M');
# use getopt instead of getopts to let long options pass through
getopt('ab:d:Dfh?i:lurs:m:no:t:vVp:M');
# check the operands for a noderange
while (my $a = shift(@ARGV)) {
if (!($a =~ /=/) && !($a =~ /^-/)) {