updated

1 files changed, 44 insertions, 42 deletions

diff --git a/control-center b/control-center
index 65a945c3..5b3bd402 100755
--- a/control-center
+++ b/control-center
@@ -289,50 +289,52 @@ $darea_title->signal_connect( expose_event => sub {
 			      });
 
 my ($pixmap_back_right, undef) = gtkcreate_png('mcc-core-back');
+
 my ($pix_splash_map, undef) = gtkcreate_png('mcc-splash');
 my $pix_dbl;
-#$notebook_global->append_page(gtkset_usize(my $fixed_about = new Gtk::Fixed, 540, 460), undef);
-#$fixed_about->put(gtkset_usize(my $darea1 = new Gtk::DrawingArea, 540, 460), 0, 0);
-#$darea1->signal_connect( size_allocate => sub { $pix_dbl = undef });
-#$darea1->signal_connect( expose_event => sub {
-#      my ($dx, $dy) = ($darea1->allocation->[2], $darea1->allocation->[3]);
-#      if (!defined($pix_dbl)) {
-# 	 $pix_dbl = new Gtk::Gdk::Pixmap($darea1->window, $dx, $dy);
-
-# #	 fill_tiled($darea1, $pix_dbl, $pixmap_back_right, 540, 460, $dx, $dy);
-# 	 $pix_dbl->draw_pixmap($darea1->style->white_gc, $pix_splash_map,
-# 			       0, 0, ($dx-540)/2, ($dy-460)/2, 540, 460);
-# 	 my $style = new Gtk::Style;
-# 	 my $style_dflt = new Gtk::Style;
-# 	 $style->font(Gtk::Gdk::Font->fontset_load(_("-urw-helvetica-medium-r-normal-*-*-190-*-*-p-*-iso8859-1")));
-# 		      #_("-adobe-times-bold-r-normal--17-*-100-100-p-*-iso8859-*,*-r-*")));
-# 	 $pix_dbl->draw_string($style->font, $darea1->style->black_gc, 80, 165, _("Welcome to the Mandrake Control Center") );
-# 	 my @revtree;
-# 	 open VERS,  "/etc/mandrake-release" or die _("cannot open this file for read: %s", $!);
-# 	 while (<VERS>) { push (@revtree,$_) }
-# 	 my @info_tree = split / /, $revtree[0];
-# 	 my ($sysname, $nodename, $release, $version, $machine) = POSIX::uname();
-# 	 my $style1 = new Gtk::Style;
-# 	 $style1->font(Gtk::Gdk::Font->fontset_load(_("-urw-helvetica-medium-r-normal-*-*-90-*-*-p-*-iso8859-1")));
-# 		      #_("-adobe-times-bold-r-normal--14-*-100-100-p-*-iso8859-*,*-r-*")));
-# 	 my $i=0;
-# 	 foreach( 
-# 		 [_("System:"), "$info_tree[0] $info_tree[1] $info_tree[3] $info_tree[4]"],
-# 		 [_("Hostname:"), $nodename],
-# 		 [_("Kernel Version:"), "$release $version"],
-# 		 [_("Machine:"), $machine] ) {
-# 	     $pix_dbl->draw_string($style_dflt->font, $darea1->style->black_gc, 80, 200+$i, $_->[0]);
-# 	     $pix_dbl->draw_string($style_dflt->font, $darea1->style->black_gc, 81, 200+$i, $_->[0]);
-# 	     $pix_dbl->draw_string($style_dflt->font, $darea1->style->black_gc, 200, 200+$i, $_->[1]);
-# 	     $i+=20;
-# 	 }
-#      }
-#      $darea1->window->draw_pixmap ($darea1->style->white_gc,
-# 				   $pix_dbl, 0, 0,
-# 				   ($darea1->allocation->[2]-540)/2, ($darea1->allocation->[3]-460)/2,
-# 				   540, 460);
-#      0;
-#  });
+$notebook_global->append_page(createScrolledWindow(my $fixed_about = new Gtk::Fixed, ['automatic', 'automatic']), undef);
+$fixed_about->put(gtkset_usize(my $darea1 = new Gtk::DrawingArea, 540, 460), 0, 0);
+$fixed_about->signal_connect(realize => sub { $fixed_about->window->set_back_pixmap($pix_splash_map, 0) });
+$darea1->signal_connect( size_allocate => sub { $pix_dbl = undef });
+$darea1->signal_connect( expose_event => sub {
+     my ($dx, $dy) = ($darea1->allocation->[2], $darea1->allocation->[3]);
+     if (!defined($pix_dbl)) {
+	 $pix_dbl = new Gtk::Gdk::Pixmap($darea1->window, $dx, $dy);
+
+#	 fill_tiled($darea1, $pix_dbl, $pixmap_back_right, 540, 460, $dx, $dy);
+	 $pix_dbl->draw_pixmap($darea1->style->white_gc, $pix_splash_map,
+			       0, 0, ($dx-540)/2, ($dy-460)/2, 540, 460);
+	 my $style = new Gtk::Style;
+	 my $style_dflt = new Gtk::Style;
+	 $style->font(Gtk::Gdk::Font->fontset_load(_("-urw-helvetica-medium-r-normal-*-*-190-*-*-p-*-iso8859-1")));
+		      #_("-adobe-times-bold-r-normal--17-*-100-100-p-*-iso8859-*,*-r-*")));
+	 $pix_dbl->draw_string($style->font, $darea1->style->black_gc, 80, 165, _("Welcome to the Mandrake Control Center") );
+	 my @revtree;
+	 open VERS,  "/etc/mandrake-release" or die _("cannot open this file for read: %s", $!);
+	 while (<VERS>) { push (@revtree,$_) }
+	 my @info_tree = split / /, $revtree[0];
+	 my ($sysname, $nodename, $release, $version, $machine) = POSIX::uname();
+	 my $style1 = new Gtk::Style;
+	 $style1->font(Gtk::Gdk::Font->fontset_load(_("-urw-helvetica-medium-r-normal-*-*-90-*-*-p-*-iso8859-1")));
+		      #_("-adobe-times-bold-r-normal--14-*-100-100-p-*-iso8859-*,*-r-*")));
+	 my $i=0;
+	 foreach( 
+		 [_("System:"), "$info_tree[0] $info_tree[1] $info_tree[3] $info_tree[4]"],
+		 [_("Hostname:"), $nodename],
+		 [_("Kernel Version:"), "$release $version"],
+		 [_("Machine:"), $machine] ) {
+	     $pix_dbl->draw_string($style_dflt->font, $darea1->style->black_gc, 80, 200+$i, $_->[0]);
+	     $pix_dbl->draw_string($style_dflt->font, $darea1->style->black_gc, 81, 200+$i, $_->[0]);
+	     $pix_dbl->draw_string($style_dflt->font, $darea1->style->black_gc, 200, 200+$i, $_->[1]);
+	     $i+=20;
+	 }
+     }
+     $darea1->window->draw_pixmap ($darea1->style->white_gc,
+				   $pix_dbl, 0, 0,
+				   ($darea1->allocation->[2]-540)/2, ($darea1->allocation->[3]-460)/2,
+				   540, 460);
+     0;
+ });
 
 $window_global->realize;