diff --git a/lib/Slic3r/GUI/Plater.pm b/lib/Slic3r/GUI/Plater.pm index d687e68a0..6cfd7b237 100644 --- a/lib/Slic3r/GUI/Plater.pm +++ b/lib/Slic3r/GUI/Plater.pm @@ -29,7 +29,7 @@ use constant TB_SCALE => &Wx::NewId; use constant TB_SPLIT => &Wx::NewId; use constant TB_VIEW => &Wx::NewId; use constant TB_SETTINGS => &Wx::NewId; -use constant apply_config_timer_EVENT => &Wx::NewId; +use constant CONFIG_TIMER_ID => &Wx::NewId; # package variables to avoid passing lexicals to threads our $THUMBNAIL_DONE_EVENT : shared = Wx::NewEventType; @@ -55,7 +55,7 @@ sub new { $self->{model} = Slic3r::Model->new; $self->{print} = Slic3r::Print->new; $self->{objects} = []; - $self->{apply_config_timer} = Wx::Timer->new($self, apply_config_timer_EVENT) + $self->{apply_config_timer} = Wx::Timer->new($self, CONFIG_TIMER_ID) if $Slic3r::have_threads; $self->{print}->set_status_cb(sub { @@ -245,7 +245,7 @@ sub new { Slic3r::thread_cleanup(); }); - EVT_TIMER($self, apply_config_timer_EVENT, sub { + EVT_TIMER($self, CONFIG_TIMER_ID, sub { my ($self, $event) = @_; $self->async_apply_config; });