diff options
Diffstat (limited to 'drakpxelinux.pl')
-rw-r--r-- | drakpxelinux.pl | 24 |
1 files changed, 6 insertions, 18 deletions
diff --git a/drakpxelinux.pl b/drakpxelinux.pl index 932b942..da0f15d 100644 --- a/drakpxelinux.pl +++ b/drakpxelinux.pl @@ -269,7 +269,7 @@ label $a->{label} sub create_model { get_items(); - my $model = Gtk2::ListStore->new(("Glib::String")); + my $model = Gtk2::ListStore->new(("Glib::String") x13); foreach my $a (@listpxe) { my $iter = $model->append; $model->set($iter, @@ -1002,24 +1002,7 @@ $W->add(gtkpack_(Gtk2::VBox->new(0,0), if_(! $::isEmbedded, 0, $banner ), 1, create_scrolled_window($treeview), 0, gtkpack_(gtkset_border_width(Gtk2::HBox->new, 3), - 0, Gtk2::Label->new(N("boot:")), - 0, $labelscombo, 0, Gtk2::VSeparator->new(), - 0, gtksignal_connect(set_help_tip(new Gtk2::Button(N("Wizard PXE server")), 'wizardsrv'), - clicked => sub { - eval { wizard_pxe_server() }; - my $err = $@; - $::WizardWindow->destroy if defined $::WizardWindow; - undef $::WizardWindow; - if ($err && $err !~ /wizcancel/) { - err_dialog(N("Error"), N("The PXE server wizard had unexpectly failled:") - . "\n\n" . $err); - } - }), - 0, Gtk2::VSeparator->new, - 0, gtksignal_connect(new Gtk2::Button(N("Help")), - clicked => sub { show_help } - ), 0, Gtk2::VSeparator->new, 0, gtksignal_connect(set_help_tip(Gtk2::Button->new(N("Add PXE entry")), 'addpxe'), clicked => sub { eval { wizard_add_entry($model, $treeview) }; @@ -1037,6 +1020,11 @@ $W->add(gtkpack_(Gtk2::VBox->new(0,0), 0, gtksignal_connect(set_help_tip(Gtk2::Button->new(N("Edit PXE entry")), 'editb'), clicked => sub { edit_box_item($model, $treeview); } ), + 0, Gtk2::Label->new(N("boot:")), + 0, $labelscombo, + 0, gtksignal_connect(new Gtk2::Button(N("Help")), + clicked => sub { show_help } + ), ), if_($::isEmbedded, 0, $okcancel), ), |