From 0258f95e67b377774ca14a60028dd4897fceffac Mon Sep 17 00:00:00 2001
From: Yves Duret <yduret@mandriva.com>
Date: Thu, 22 Mar 2001 16:03:37 +0000
Subject: mapn works tx dams

---
 perl-install/bootlook.pm | 21 ++-------------------
 1 file changed, 2 insertions(+), 19 deletions(-)

(limited to 'perl-install/bootlook.pm')

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";
     }
-- 
cgit v1.2.1