From cd48dc403109f11c9f4b556c9a98649909db3e36 Mon Sep 17 00:00:00 2001
From: Henrik Brix Andersen <henrik@brixandersen.dk>
Date: Wed, 27 Jun 2012 17:59:29 +0200
Subject: [PATCH] - Add nozzle_diameter to Configuration Wizard - Automatically
 set layer_height to (nozzle_diameter - 0.1)

---
 lib/Slic3r/GUI/ConfigWizard.pm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

diff --git a/lib/Slic3r/GUI/ConfigWizard.pm b/lib/Slic3r/GUI/ConfigWizard.pm
index 724367f4e..e6be8c7a9 100644
--- a/lib/Slic3r/GUI/ConfigWizard.pm
+++ b/lib/Slic3r/GUI/ConfigWizard.pm
@@ -16,6 +16,7 @@ sub new {
     $self->add_page(Slic3r::GUI::ConfigWizard::Page::Welcome->new($self));
     $self->add_page(Slic3r::GUI::ConfigWizard::Page::Firmware->new($self));
     $self->add_page(Slic3r::GUI::ConfigWizard::Page::Bed->new($self));
+    $self->add_page(Slic3r::GUI::ConfigWizard::Page::Nozzle->new($self));
     $self->add_page(Slic3r::GUI::ConfigWizard::Page::Filament->new($self));
     $self->add_page(Slic3r::GUI::ConfigWizard::Page::Temperature->new($self));
     $self->add_page(Slic3r::GUI::ConfigWizard::Page::BedTemperature->new($self));
@@ -255,6 +256,31 @@ sub apply {
     Slic3r::Config->set('print_center', [$bed_size->[0]/2, $bed_size->[1]/2]);
 }
 
+package Slic3r::GUI::ConfigWizard::Page::Nozzle;
+use Wx qw(:sizer :progressdialog);
+use Wx::Event qw();
+use base 'Slic3r::GUI::ConfigWizard::Page';
+
+sub new {
+    my $class = shift;
+    my ($parent) = @_;
+    my $self = $class->SUPER::new($parent, 'Nozzle Diameter');
+
+    $self->append_text('Enter the diameter of your printers hot end nozzle below.');
+    $self->append_option('nozzle_diameter');
+
+    return $self;
+}
+
+sub apply {
+    my $self = shift;
+    $self->SUPER::apply;
+
+    # set layer_height to nozzle_diameter - 0.1
+    my $nozzle = Slic3r::Config->get_raw('nozzle_diameter');
+    Slic3r::Config->set('layer_height', $nozzle - 0.1);
+}
+
 package Slic3r::GUI::ConfigWizard::Page::Filament;
 use Wx qw(:sizer :progressdialog);
 use Wx::Event qw();