Fix flag option in getopts
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2336 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
192d4aab71
commit
ae0ceb10ce
@ -71,7 +71,7 @@ foreach my $a (@ARGV)
|
||||
my @checkcmds = ("nimnodeset", "mkdsklsnode", "rmdsklsnode", "xcat2nim", "nimnodecust");
|
||||
if (grep(/^$bname$/, @checkcmds) ) {
|
||||
# strip off all options
|
||||
getopts('ab:d:f:h?i:l:urs:m:no:t:vVp:');
|
||||
getopts('ab:d:fh?i:l:urs:m:no:t:vVp:');
|
||||
# check the operands for a noderange
|
||||
while (my $a = shift(@ARGV)) {
|
||||
if (!($a =~ /=/)) {
|
||||
|
Loading…
Reference in New Issue
Block a user