diff options
Diffstat (limited to 'perl-install/bootlook.pm')
| -rw-r--r-- | perl-install/bootlook.pm | 21 |
1 files changed, 2 insertions, 19 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm index 99766089b..c5f070aef 100644 --- a/perl-install/bootlook.pm +++ b/perl-install/bootlook.pm @@ -32,8 +32,6 @@ use common qw(:common :file :functional :system); use my_gtk qw(:helpers :wrappers); use any; -#my $path_to_pixmaps = "/usr/share/libDrakX/pixmaps"; -my $path_to_pixmaps = ""; setlocale (LC_ALL, ""); Locale::GetText::textdomain ("Bootlookdrake"); @@ -45,7 +43,6 @@ if ($::isEmbedded) { print "EMBED\n"; print "XID : $::XID\n"; print "CCPID : $::CCPID\n"; -# $path_to_pixmaps = "./pixmaps/"; } my $in = interactive->vnew('su'); @@ -298,28 +295,14 @@ sub updateAurora { if ($a_mode) { mapn { - print " !!\n"; if ($_[0]) { symlinkf("/lib/aurora/Monitors/$_[1]", "/etc/aurora/Monitor"); $in->standalone::pkgs_install($_[2]) if !(-e "/lib/aurora/Monitors/$_[1]"); } } [$a_h_button->get_active(), "NewStyle-WsLib", q(Aurora-Monitor-NewStyle-WsLib)], - [$a_v_button->get_active(), "Traditional-WsLib", q(Aurora-Monitor-Traditional-WsLib)], - [$a_g_button->get_active(), "Traditional-Gtk+", q(Aurora-Monitor-Traditional-Gtk+)]; - -# if ($a_h_button->get_active()) { -# symlinkf("/lib/aurora/Monitors/NewStyle-WsLib", "/etc/aurora/Monitor"); -# $in->standalone::pkgs_install(qw(Aurora-Monitor-NewStyle-WsLib)) if !(-e "/lib/aurora/Monitors/NewStyle-WsLib"); -# } -# if ($a_v_button->get_active()) { -# symlinkf("/lib/aurora/Monitors/Traditional-WsLib", "/etc/aurora/Monitor"); -# $in->standalone::pkgs_install(qw(Aurora-Monitor-Traditional-WsLib)) if !(-e "/lib/aurora/Monitors/Traditional-WsLib"); -# } -# if ($a_g_button->get_active()) { -# symlinkf("/lib/aurora/Monitors/Traditional-Gtk+", "/etc/aurora/Monitor"); -# $in->standalone::pkgs_install(qw(Aurora-Monitor-Traditional-Gtk+)) if !(-e "/lib/aurora/Monitors/Traditional-Gtk+"); -# } + [$a_v_button->get_active(), "Traditional-WsLib", q(Aurora-Monitor-Traditional-WsLib)], + [$a_g_button->get_active(), "Traditional-Gtk+", q(Aurora-Monitor-Traditional-Gtk+)]; } else { unlink "/etc/aurora/Monitor"; } |