diff options
author | Alessandro Ranellucci <aar@cpan.org> | 2016-05-24 04:54:52 +0300 |
---|---|---|
committer | Alessandro Ranellucci <aar@cpan.org> | 2016-05-31 16:02:56 +0300 |
commit | 2a8c139ca42c759a590bb72a23257140789399a9 (patch) | |
tree | cd19333fc10bf1b002755d490c790e0ffb87dc56 /lib | |
parent | 30f6e4b16f94b167b28521d71786aeea7cc4585b (diff) |
Add XYZ homing button to printer manual control
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Slic3r/GUI/Controller/ManualControlDialog.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Slic3r/GUI/Controller/ManualControlDialog.pm b/lib/Slic3r/GUI/Controller/ManualControlDialog.pm index a8209f988..ebd0031a9 100644 --- a/lib/Slic3r/GUI/Controller/ManualControlDialog.pm +++ b/lib/Slic3r/GUI/Controller/ManualControlDialog.pm @@ -87,7 +87,8 @@ sub new { $bed_sizer->Add($sizer, 1, wxEXPAND, 0); } - $bed_sizer->AddSpacer(0); + # XYZ home button + $move_button->($bed_sizer, 'XYZ', 'house', 1, wxTOP, sub { $self->home(undef) }); # X buttons { @@ -180,6 +181,7 @@ sub rel_move { sub home { my ($self, $axis) = @_; + $axis //= ''; $self->sender->send(sprintf("G28 %s", $axis), 1); $self->{canvas}->set_pos(undef); $self->x_homed(1) if $axis eq 'X'; |