From f217fe40e3b748dcecb8635b20559f725f93574a Mon Sep 17 00:00:00 2001
From: Yves Duret <yduret@mandriva.com>
Date: Wed, 22 Aug 2001 13:27:58 +0000
Subject: removed data dumper code

---
 control-center | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/control-center b/control-center
index 74d56c46..0d6cd29c 100755
--- a/control-center
+++ b/control-center
@@ -22,7 +22,6 @@
 
 use Config;
 use POSIX;
-use Data::Dumper;
 
 my $_xbindir = "/usr/X11R6/bin";
 my $_bindir = "/usr/bin";
@@ -210,7 +209,6 @@ sub translate {
 sub exec_treeitem {
     my ($label, $exec_string, $available) = @_;
     $scrolled_global->set_usize($label eq _("Software Manager") ? 1 : 210, 0);
-    print "e exec_tree_item->[$nb_pages]\n" . (Data::Dumper->Dump([\@pid_launched], ['p']));
     if (!$available) {
 	my $vbox = new Gtk::VBox(0, 0);
 	$vbox->pack_start( new Gtk::Label( _("The application cannot be loaded,\nthe file '%s' has not been found.\nTry to install it.", $exec_string)), 1, 0, 0);
@@ -228,13 +226,11 @@ sub exec_treeitem {
 	    $notebook_global->append_page($socket, new Gtk::Label(""));
 	    $nb_pages++;
 	    $tree_launched{$label}->[0]=$nb_pages;
-#	    print "hash label->[$nb_pages]\n" . (Data::Dumper->Dump([\@pid_launched], ['p']));
 	    $notebook_global->set_page($nb_pages);
 	    $socket->realize;
 	    $socket->steal(launch_wait("rxvt", "rxvt",1));
 	    $notebook_global->show_all();	    
 	    $notebook_global->set_page($nb_pages);
-#	    print "l console exec_tree_item->[$nb_pages]\n" . (Data::Dumper->Dump([\@pid_launched], ['p']));
 	    return;
 	}
 	my $vbox = new Gtk::VBox(0, 0);
@@ -300,7 +296,6 @@ sub exec_treeitem {
 
 sub launch_wait {
     my ($exec, $grep, $num, $zz) = @_;
-#    print "e launch_wait->[$nb_pages]\n" . (Data::Dumper->Dump([\@pid_launched], ['p']));
     my $b = "xwininfo -root -tree -int | grep '" . $grep . "'";
     my @before = split ('\n', `$b`);
     unless ($pid = fork) {
@@ -308,7 +303,6 @@ sub launch_wait {
 	exec($exec);
     }
     $pid_launched[$nb_pages-1] = $pid;
-#    print "e launch pid->[$nb_pages]\n" . (Data::Dumper->Dump([\@pid_launched], ['p']));
 #    $nb_pages++;
     my $res = 0;
     while (!$res) {
@@ -493,8 +487,7 @@ sub about_mdk_cc {
     $style1->font(Gtk::Gdk::Font->fontset_load(_("-adobe-times-bold-r-normal--14-*-100-100-p-*-iso8859-*,*-r-*")));
     $label->set_style($style1); 
     $window_about->vbox->pack_start( $label, 1, 1, 0 );
-
-    $window_about->vbox->pack_start( new Gtk::Label( _("Authors: ") . "\n\n Daouda Lo <daouda\@mandrakesoft.com> \n Damien Krotkine <dams\@mandrakesoft.com> \n Yves Duret <yduret\@mandrakesoft.com \n"), 1, 1, 0 );
+    $window_about->vbox->pack_start( new Gtk::Label( _("Authors: ") . "\n\n Yves Duret <yduret\@mandrakesoft.com \n Daouda Lo <daouda\@mandrakesoft.com> \n Damien Krotkine <dams\@mandrakesoft.com> \n"), 1, 1, 0 );
 
     $window_about->show_all();
     $window_about->set_modal(1);
-- 
cgit v1.2.1