|
@ -440,11 +440,11 @@ my $entry = entry($false,0); |
|
|
my $opt = Gtk::OptionMenu->new(); |
|
|
my $opt = Gtk::OptionMenu->new(); |
|
|
$tooltips->set_tip( $opt, "Choose the Boot method.", "" ); |
|
|
$tooltips->set_tip( $opt, "Choose the Boot method.", "" ); |
|
|
my $menu = Gtk::Menu->new(); |
|
|
my $menu = Gtk::Menu->new(); |
|
|
my $item = Gtk::MenuItem->new("Method -> lilo" ); |
|
|
my $item = Gtk::MenuItem->new("2 disk compression" ); |
|
|
$item->show(); |
|
|
$item->show(); |
|
|
# Eventually get_menu, or something totally different will be used. |
|
|
# Eventually get_menu, or something totally different will be used. |
|
|
$item->signal_connect( 'activate',sub { $entry->set_text("lilo"); |
|
|
$item->signal_connect( 'activate',sub { $entry->set_text("2 disk compression"); |
|
|
$container[METHOD] = "lilo"}); |
|
|
$container[METHOD] = "2 disk compression"}); |
|
|
$menu->append( $item ); |
|
|
$menu->append( $item ); |
|
|
$opt->set_menu( $menu ); |
|
|
$opt->set_menu( $menu ); |
|
|
$box2->pack_start( $opt, $true, $true, 0 ); |
|
|
$box2->pack_start( $opt, $true, $true, 0 ); |
|
@ -1908,7 +1908,8 @@ sub entry { |
|
|
my($edit,$num) = @_; |
|
|
my($edit,$num) = @_; |
|
|
|
|
|
|
|
|
my $entry = Gtk::Entry->new(); |
|
|
my $entry = Gtk::Entry->new(); |
|
|
$entry->set_editable( $true ); |
|
|
|
|
|
|
|
|
$entry->set_editable( $false ) if $edit == 0; |
|
|
|
|
|
|
|
|
if ($num == 0) { |
|
|
if ($num == 0) { |
|
|
$entry->signal_connect( "activate", sub { |
|
|
$entry->signal_connect( "activate", sub { |
|
@ -2213,7 +2214,8 @@ elsif (defined $container[METHOD] && defined $container[KERNEL] && |
|
|
$container[ABS_APPEND] |
|
|
$container[ABS_APPEND] |
|
|
); |
|
|
); |
|
|
|
|
|
|
|
|
lilo(); |
|
|
lilo(); # This is the default now, and the value for |
|
|
|
|
|
# METHOD doesn't matter now. |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
} # end sub submit |
|
|
} # end sub submit |
|
|