Separate the Slice button a bit

This commit is contained in:
Alessandro Ranellucci 2012-03-03 22:53:12 +01:00
parent 5c79024215
commit 8566b4f910
3 changed files with 14 additions and 9 deletions

View file

@ -9,7 +9,7 @@ our $Options = {
# miscellaneous options # miscellaneous options
'notes' => { 'notes' => {
label => 'Configuraton notes', label => 'Configuration notes',
cli => 'notes=s', cli => 'notes=s',
type => 's', type => 's',
multiline => 1, multiline => 1,
@ -73,7 +73,7 @@ our $Options = {
type => 'bool', type => 'bool',
}, },
'gcode_comments' => { 'gcode_comments' => {
label => 'Verbose GCODE (comments)', label => 'Verbose G-code',
cli => 'gcode-comments', cli => 'gcode-comments',
type => 'bool', type => 'bool',
}, },

View file

@ -30,11 +30,16 @@ sub OnInit {
# File menu # File menu
my $fileMenu = Wx::Menu->new; my $fileMenu = Wx::Menu->new;
$fileMenu->Append(1, "Slice..."); $fileMenu->Append(1, "Save Config…");
$fileMenu->Append(2, "Slice and save as..."); $fileMenu->Append(2, "Open Config…");
$fileMenu->AppendSeparator();
$fileMenu->Append(3, "Slice…");
$fileMenu->Append(4, "Slice and Save As…");
$menubar->Append($fileMenu, "&File"); $menubar->Append($fileMenu, "&File");
EVT_MENU($frame, 1, sub { $panel->do_slice }); EVT_MENU($frame, 1, sub { $panel->save_config });
EVT_MENU($frame, 2, sub { $panel->do_slice(save_as => 1) }); EVT_MENU($frame, 2, sub { $panel->load_config });
EVT_MENU($frame, 3, sub { $panel->do_slice });
EVT_MENU($frame, 4, sub { $panel->do_slice(save_as => 1) });
$box->SetSizeHints($frame); $box->SetSizeHints($frame);
$frame->SetSizer($box); $frame->SetSizer($box);

View file

@ -128,14 +128,14 @@ sub new {
my $slice_button = Wx::Button->new($self, -1, "Slice..."); my $slice_button = Wx::Button->new($self, -1, "Slice...");
$slice_button->SetDefault(); $slice_button->SetDefault();
$buttons_sizer->Add($slice_button, 0); $buttons_sizer->Add($slice_button, 0, wxRIGHT, 20);
EVT_BUTTON($self, $slice_button, sub { $self->do_slice }); EVT_BUTTON($self, $slice_button, sub { $self->do_slice });
my $save_button = Wx::Button->new($self, -1, "Save configuration..."); my $save_button = Wx::Button->new($self, -1, "Save config...");
$buttons_sizer->Add($save_button, 0); $buttons_sizer->Add($save_button, 0);
EVT_BUTTON($self, $save_button, sub { $self->save_config }); EVT_BUTTON($self, $save_button, sub { $self->save_config });
my $load_button = Wx::Button->new($self, -1, "Load configuration..."); my $load_button = Wx::Button->new($self, -1, "Load config...");
$buttons_sizer->Add($load_button, 0); $buttons_sizer->Add($load_button, 0);
EVT_BUTTON($self, $load_button, sub { $self->load_config }); EVT_BUTTON($self, $load_button, sub { $self->load_config });