From 40f1176346efa3e320aaf3ea90a51fcc04c8c478 Mon Sep 17 00:00:00 2001 From: Henrik Brix Andersen Date: Fri, 27 Jul 2012 13:54:45 +0200 Subject: [PATCH] Be careful not to change the current selection when working around http://trac.wxwidgets.org/ticket/13769 --- lib/Slic3r/GUI/Tab.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lib/Slic3r/GUI/Tab.pm b/lib/Slic3r/GUI/Tab.pm index c8bbb41bc..1aeebbaa4 100644 --- a/lib/Slic3r/GUI/Tab.pm +++ b/lib/Slic3r/GUI/Tab.pm @@ -229,20 +229,21 @@ sub set_dirty { my $self = shift; my ($dirty) = @_; - my $i = $self->{dirty} // $self->{presets_choice}->GetSelection; #/ + my $selection = $self->{presets_choice}->GetSelection; + my $i = $self->{dirty} // $selection; #/ my $text = $self->{presets_choice}->GetString($i); if ($dirty) { $self->{dirty} = $i; if ($text !~ / \(modified\)$/) { $self->{presets_choice}->SetString($i, "$text (modified)"); - $self->{presets_choice}->SetSelection($i); # wxMSW needs this after every SetString() + $self->{presets_choice}->SetSelection($selection); # http://trac.wxwidgets.org/ticket/13769 } } else { $self->{dirty} = undef; $text =~ s/ \(modified\)$//; $self->{presets_choice}->SetString($i, $text); - $self->{presets_choice}->SetSelection($i); # wxMSW needs this after every SetString() + $self->{presets_choice}->SetSelection($selection); # http://trac.wxwidgets.org/ticket/13769 } $self->sync_presets; }