3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-07-14 10:17:55 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 2

Ask for confirmation before closing if there are unsaved presets.

Browse source
This commit is contained in:
Henrik Brix Andersen 2012-06-23 17:39:20 +02:00
parent 1409cbf7f7
commit d0588c2ef8
2 changed files with 34 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

18
lib/Slic3r/GUI/SkeinPanel.pm
View file

@ -223,4 +223,22 @@ sub load_config {
$dlg->Destroy;
}
sub on_close {
my $self = shift;
my @dirty;
foreach (keys %{$self->{options_tabs}}) {
push (@dirty, $_) if $self->{options_tabs}{$_}->is_dirty;
}
if (@dirty) {
my $titles = join ', ', @dirty;
my $confirm = Wx::MessageDialog->new($self, "You have unsaved changes ($titles). Exit anyway?",
'Unsaved Presets', wxICON_QUESTION | wxOK | wxCANCEL);
return ($confirm->ShowModal == wxID_OK);
}
return 1;
}
1;