(core) can use variable to defined unitary options (#3938)
This commit is contained in:
parent
b5033f76e3
commit
ddab01fc02
|
@ -71,7 +71,10 @@ sub GetOptions {
|
|||
|
||||
my ($option_selected, $type_opt) = ($1, $2);
|
||||
if (!defined($type_opt)) {
|
||||
${$opts{$option_selected}} = 1;
|
||||
($num_args, my $assigned) = get_assigned_value(num_args => $num_args, pos => $i, val => $value);
|
||||
if ($assigned ne '0') {
|
||||
${$opts{$option_selected}} = 1;
|
||||
}
|
||||
} elsif ($type_opt =~ /:s$/) {
|
||||
($num_args, my $assigned) = get_assigned_value(num_args => $num_args, pos => $i, val => $value);
|
||||
${$opts{$option_selected}} = $assigned;
|
||||
|
|
Loading…
Reference in New Issue