3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge pull request #378 from beanz/underscore-options

Browse Source 
Allow cli options to use '_' instead of '-'.
This commit is contained in:
Alessandro Ranellucci 2012-05-20 09:11:14 -07:00
commit 0a5cf4ba90
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
slic3r.pl
View File

@ -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);