Add initial configuration wizard

This commit is contained in:
Henrik Brix Andersen 2012-06-26 17:42:29 +02:00
parent a4de0e659d
commit de3347c825
3 changed files with 371 additions and 0 deletions

View file

@ -223,6 +223,15 @@ sub load_config {
$dlg->Destroy;
}
sub config_wizard {
my $self = shift;
if (Slic3r::GUI::ConfigWizard->new($self)->run) {
$_->() for values %Slic3r::GUI::OptionsGroup::reload_callbacks;
$_->set_dirty(1) for values %{$self->{options_tabs}};
}
}
sub on_close {
my $self = shift;