Fix multi-extruder options in GUI

This commit is contained in:
Alessandro Ranellucci 2012-07-28 11:53:10 +02:00
parent 87934a972c
commit 92754d7cd4
2 changed files with 10 additions and 1 deletions

View file

@ -209,6 +209,8 @@ Slic3r::GUI::ConfigOptionsGroup - pre-filled Wx::StaticBoxSizer wrapper containi
=cut
use List::Util qw(first);
has 'config' => (is => 'ro', required => 1);
sub _trigger_options {
@ -232,6 +234,13 @@ sub _trigger_options {
} @{$self->options};
}
sub _option {
my $self = shift;
my ($opt_key) = @_;
return first { $_->{opt_key} =~ /^\Q$opt_key\E(#.+)?$/ } @{$self->options};
}
sub set_value {
my $self = shift;
my ($opt_key, $value) = @_;