summaryrefslogtreecommitdiffstats
path: root/perl-install/bootlook.pm
diff options
context:
space:
mode:
authorYves Duret <yduret@mandriva.com>2001-04-12 01:36:47 +0000
committerYves Duret <yduret@mandriva.com>2001-04-12 01:36:47 +0000
commitac91a2948328e2cd86d62b227e3397c016afb789 (patch)
tree02bae6c844ca4f890514b12da8cd6d8f7d40219f /perl-install/bootlook.pm
parentb956621f9dfd0999aedb1a3ee5380206cde11404 (diff)
downloaddrakx-ac91a2948328e2cd86d62b227e3397c016afb789.tar
drakx-ac91a2948328e2cd86d62b227e3397c016afb789.tar.gz
drakx-ac91a2948328e2cd86d62b227e3397c016afb789.tar.bz2
drakx-ac91a2948328e2cd86d62b227e3397c016afb789.tar.xz
drakx-ac91a2948328e2cd86d62b227e3397c016afb789.zip
added some stuff
Diffstat (limited to 'perl-install/bootlook.pm')
-rw-r--r--perl-install/bootlook.pm13
1 files changed, 10 insertions, 3 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index 576ae5569..f09ac5f89 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -62,6 +62,8 @@ my $a_mode = (-e "/etc/aurora/Monitor") ? 1 : 0;
my $l_mode = isAutologin();
my %auto_mode = get_autologin("");
my $inmain = 0;
+my $lilogrub = `detectloader -q`;
+$lilogrub =~ s/GRUB\n/GRUB (GNU GRand Unified Bootloader)/;
my $window = $::isEmbedded ? new Gtk::Plug ($::XID) : new Gtk::Window ("toplevel");
$window->signal_connect(delete_event => sub { $::isEmbedded ? kill(USR1, $::CCPID) : Gtk->exit(0) });
@@ -111,11 +113,16 @@ my $menubar = get_main_menu( $window );
######### menus end
my $global_vbox = new Gtk::VBox();
-#$global_vbox->pack_start (new Gtk::Label(_("Boot style configuration")), 0, 0, 0);
-# lilo/grub
+########### lilo/grub
my $lilo_dedans = new Gtk::HBox(0, 0);
-my $lilo_button = new Gtk::Button _("Lilo/Grub configuration");
+my $lilo_button = new Gtk::Button _("Configure");
+
+my $lilo_label = new Gtk::Label(
+_("You are currently using %s as Boot Manager.
+Click on Configure to launch the setup wizard.", $lilogrub));
+
+$lilo_dedans->pack_start($lilo_label,0,0,0);
$lilo_dedans->pack_end($lilo_button,0,0,0);
$lilo_button->signal_connect(clicked => sub { lilo_choice(); });