From 7e5c600b4e665f7e19f04f2fcb97fa743475a935 Mon Sep 17 00:00:00 2001
From: Antoine Ginies <aginies@mandriva.com>
Date: Fri, 2 Sep 2005 14:15:56 +0000
Subject: select default boot in combobox

---
 drakpxelinux.pl | 17 +++++++++++++----
 1 file changed, 13 insertions(+), 4 deletions(-)

(limited to 'drakpxelinux.pl')

diff --git a/drakpxelinux.pl b/drakpxelinux.pl
index 17c4118..151145b 100644
--- a/drakpxelinux.pl
+++ b/drakpxelinux.pl
@@ -376,7 +376,9 @@ sub remove_item {
       }
       $model->remove($iter);
       splice @{$pxelinux_conf->{entries}}, $i, 1;
+      write_conf($pxelinux_conf, $treeview);
     }
+
 }
 
 sub test_similar_label {
@@ -406,7 +408,7 @@ sub clone_box_item {
 	$newentry_data->{label} = $new_entry;
 	push @{$pxelinux_conf->{entries}}, $newentry_data;
 	set_pxelinux_entry_at_iter($model, $model->append, $newentry_data);
-#	write_conf($pxelinux_conf, $treeview);
+	write_conf($pxelinux_conf, $treeview);
 	Gtk2->main_quit;
       };
     gtkadd($w->{window},
@@ -634,6 +636,7 @@ sub edit_box_item {
 
 				   # update value in cells
 				   set_pxelinux_entry_at_iter($model, $iter, $entry);
+				   write_conf($pxelinux_conf, $treeview);
 				   $dialog->destroy;
 				   network::pxe::add_in_help($entry->{label}, $entry->{info});
 				 },
@@ -1039,6 +1042,12 @@ sub refresh_menu {
   my @menu = network::pxe::list_pxelinux_labels($pxelinux_conf);
   mygtk2::gtkset($menu_combo, list => [ '', @menu ]);
   my $defaultlabel = $pxelinux_conf->{default};
+  my $c = 1;
+  foreach (@menu) {
+    if ($_ eq $defaultlabel) {
+      $menu_combo->set_active($c);
+     } else { $c++ }
+  }
   $menu_combo->signal_connect(changed => sub {
 				$pxelinux_conf->{default} = $menu_combo->get_active_text;
 				write_conf($pxelinux_conf, $treeview);
@@ -1201,17 +1210,17 @@ gtkpack($w->{window}, gtknew('VBox', spacing => 0, children => [
 					     0, gtksignal_connect(set_help_tip(Gtk2::Button->new(N("Remove PXE entry")), 'removepxe'), clicked => sub { 
 								    my $pxelinux_conf = get_pxelinux_conf_from_profile();
 								    remove_item($model, $treeview, $pxelinux_conf);
-								    write_conf($pxelinux_conf, $treeview);
+								    #write_conf($pxelinux_conf, $treeview);
 								  }),
 					     0, gtksignal_connect(set_help_tip(Gtk2::Button->new(N("Edit PXE entry")), 'editb'), clicked => sub {
 								    my $pxelinux_conf = get_pxelinux_conf_from_profile();
 								    edit_box_item($model, $treeview, $pxelinux_conf);
-								    write_conf($pxelinux_conf, $treeview);
+								    #write_conf($pxelinux_conf, $treeview);
 								  }),
 					     0, gtksignal_connect(Gtk2::Button->new(N("Clone PXE entry")), clicked => sub {
 								    my $pxelinux_conf = get_pxelinux_conf_from_profile();
 								    clone_box_item($model, $treeview, $pxelinux_conf);
-								    write_conf($pxelinux_conf, $treeview);
+
 								  }),
 											    ]),
 							       ]),
-- 
cgit v1.2.1