mirror of
https://github.com/OrcaSlicer/OrcaSlicer.git
synced 2026-05-19 11:23:42 +00:00
Don't emit warnings on unknown options
This commit is contained in:
@@ -985,8 +985,12 @@ sub set {
|
|||||||
}
|
}
|
||||||
|
|
||||||
if (!exists $Options->{$opt_key}) {
|
if (!exists $Options->{$opt_key}) {
|
||||||
$opt_key = +(grep { $Options->{$_}{aliases} && grep $_ eq $opt_key, @{$Options->{$_}{aliases}} } keys %$Options)[0]
|
my @keys = grep { $Options->{$_}{aliases} && grep $_ eq $opt_key, @{$Options->{$_}{aliases}} } keys %$Options;
|
||||||
or warn "Unknown option $opt_key\n";
|
if (!@keys) {
|
||||||
|
warn "Unknown option $opt_key\n";
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
$opt_key = $keys[0];
|
||||||
}
|
}
|
||||||
|
|
||||||
# clone arrayrefs
|
# clone arrayrefs
|
||||||
|
|||||||
Reference in New Issue
Block a user