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
'notes' => {
label => 'Configuraton notes',
label => 'Configuration notes',
cli => 'notes=s',
type => 's',
multiline => 1,
@ -73,7 +73,7 @@ our $Options = {
type => 'bool',
},
'gcode_comments' => {
label => 'Verbose GCODE (comments)',
label => 'Verbose G-code',
cli => 'gcode-comments',
type => 'bool',
},

View file

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

View file

@ -128,14 +128,14 @@ sub new {
my $slice_button = Wx::Button->new($self, -1, "Slice...");
$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 });
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);
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);
EVT_BUTTON($self, $load_button, sub { $self->load_config });