Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/supermerill/SuperSlicer.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorAlessandro Ranellucci <aar@cpan.org>2016-05-24 04:54:52 +0300
committerAlessandro Ranellucci <aar@cpan.org>2016-05-31 16:02:56 +0300
commit2a8c139ca42c759a590bb72a23257140789399a9 (patch)
treecd19333fc10bf1b002755d490c790e0ffb87dc56 /lib
parent30f6e4b16f94b167b28521d71786aeea7cc4585b (diff)
Add XYZ homing button to printer manual control
Diffstat (limited to 'lib')
-rw-r--r--lib/Slic3r/GUI/Controller/ManualControlDialog.pm4
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';