Allow cli options to use '_' instead of '-'.
This makes it easier to copy and paste options from config files.
This commit is contained in:
parent
67a076b360
commit
b0303c1e3b
@ -30,8 +30,12 @@ my %cli_options = ();
|
|||||||
);
|
);
|
||||||
foreach my $opt_key (keys %$Slic3r::Config::Options) {
|
foreach my $opt_key (keys %$Slic3r::Config::Options) {
|
||||||
my $opt = $Slic3r::Config::Options->{$opt_key};
|
my $opt = $Slic3r::Config::Options->{$opt_key};
|
||||||
$options{ $opt->{cli} } = \$cli_options{$opt_key}
|
my $cli = $opt->{cli} or next;
|
||||||
if $opt->{cli};
|
if ($cli =~ /-/) {
|
||||||
|
# allow alternative options with '_' in place of '-'
|
||||||
|
$cli = $opt_key.'|'.$cli;
|
||||||
|
}
|
||||||
|
$options{ $cli } = \$cli_options{$opt_key};
|
||||||
}
|
}
|
||||||
|
|
||||||
GetOptions(%options) or usage(1);
|
GetOptions(%options) or usage(1);
|
||||||
|
Loading…
Reference in New Issue
Block a user