Projector for DLP

This commit is contained in:
Alessandro Ranellucci 2015-11-15 21:08:14 +01:00
parent 80620a5e94
commit 6bfa2cfaec
7 changed files with 636 additions and 7 deletions

View file

@ -247,8 +247,8 @@ sub set_value {
}
sub _on_change {
my ($self, $opt_id) = @_;
$self->on_change->($opt_id);
my ($self, $opt_id, $value) = @_;
$self->on_change->($opt_id, $value);
}
sub _on_kill_focus {
@ -408,7 +408,7 @@ sub _get_config_value {
}
sub _on_change {
my ($self, $opt_id) = @_;
my ($self, $opt_id, $value) = @_;
if (exists $self->_opt_map->{$opt_id}) {
my ($opt_key, $opt_index) = @{ $self->_opt_map->{$opt_id} };
@ -430,7 +430,7 @@ sub _on_change {
}
}
$self->SUPER::_on_change($opt_id);
$self->SUPER::_on_change($opt_id, $value);
}
sub _on_kill_focus {