add about box

1 files changed, 35 insertions, 14 deletions

diff --git a/control-center3 b/control-center3
index 0cd15430..bfc4eeeb 100755
--- a/control-center3
+++ b/control-center3
@@ -32,7 +32,7 @@ my %pixmaps_global;
 my $xpm_path="pixmaps";
 
 my $window_global = new Gtk::Window -toplevel;
-$window_global->set_usize(640, 480);
+$window_global->set_usize(800, 600);
 $window_global->signal_connect ( delete_event => sub { Gtk->exit(0); });
 $window_global->set_position(1);
 $window_global->set_title("Mandrake Control Center");
@@ -53,9 +53,9 @@ my @item_factory_entries = (
 			     'type' => '<Item>'
 			    },
 			    ["/_Help",	undef,	0,	"<Branch>"],
-			    ["/Help/_Mandrake Control Center",	undef,	30],
-			    ["/Help/_Report Bug",	undef,	30],
-			    ["/Help/_About",	undef,	30]
+			    ["/Help/_Mandrake Control Center",	undef,	2],
+			    ["/Help/_Report Bug",	undef,	3 ],
+			    ["/Help/_About",  undef,  4 ]
 			    );
 
 my ($accel_group, $item_factory, $box1, $label, $box2);
@@ -80,7 +80,7 @@ $vbox_global->pack_start($hbox_global, 1, 1, 0);
 $hbox_global->border_width(5);
 my $scrolled_global = new Gtk::ScrolledWindow;
 $scrolled_global->set_policy('automatic','automatic');
-$scrolled_global->set_usize(120, 0);
+$scrolled_global->set_usize(180, 0);
 $scrolled_global->set_name("icons_back");
 #$scrolled_global->window->draw_rectangle(nil,1, 0, 0, 70, 70); #$scrolled_global->window->style->bg_gc('normal')
 $hbox_global->pack_start($scrolled_global,0,1,0);
@@ -107,10 +107,10 @@ $label_about2->set_style($style);
 $hbox1->pack_start($label_about2, 0, 1, 0);
 my $vbox_about = new Gtk::VBox(0,10);
 $vbox_about->pack_start($hbox1, 0, 1, 0);
-my $label_about3 = new Gtk::Label ("This is the Mandrake Control Center, The place where you can configure your Mandrake Box");
+my $label_about3 = new Gtk::Label ("The place where you can configure your Mandrake Box");
 $vbox_about->pack_start($label_about3, 0, 0, 0);
 
-my $table_info1 = new Gtk::Table(6,2,1);
+$table_info1 = new Gtk::Table(6,2,1);
 $table_info1->set_row_spacings(15);
 $table_info1->set_col_spacings(10);
 
@@ -176,9 +176,9 @@ my $tree= new Gtk::Tree;
 $vbox_global_left->pack_start($tree,1,1,0);
 map {
     create_treeitem($tree,"$xpm_path/logo.xpm",$_);
-    } ('Boot Conf', 'Hard Conf', 'Encule', 'Ta race', 'Salope');
+    } ('Boot Configuration', 'Hardware Configuration', 'User and Groups Management', 'Network and Internet Connection', 'Menu Customization', 
+        'Font Management');
     
-
 my $rc = "control-center.rc";
 Gtk::Rc->parse($rc);
 $window_global->show_all;
@@ -195,13 +195,33 @@ $SIG{USR1} = sub { $notebook_global->set_page(0); }; # embedded applications wil
 
 Gtk->main;
 
-#sub about_mdk_cc()
-#{
-#}
+sub about_mdk_cc()
+{
+    my $window_about = new Gtk::Dialog();
+    $window_about->set_position(1);
+    my $button = new Gtk::Button("Close");
+    $button->signal_connect_object("clicked",$window_about => destroy);
+    $window_about->action_area->pack_start($button,$true,$true,0);
+    $button->show();
+    
+    my $label = new Gtk::Label( "Mandrake Control Center 1.0 \n Copyright (C) 2001 Mandrakesoft SA" );
+    my $style1 = new Gtk::Style;
+    $style1->font(Gtk::Gdk::Font->load('-adobe-times-bold-r-normal--14-100-100-100-p-76-iso8859-1'));
+    $label->set_style($style1); 
+    $window_about->vbox->pack_start( $label, $true, $true, 0 );
+    $label->show();
+
+    my $label1 = new Gtk::Label( "Authors :\n Daouda Lo <daouda\@mandrakesoft.com> \n Damien Krotkine <damien\@mandrakesoft.com>" );
+    $window_about->vbox->pack_start( $label1, $true, $true, 0 );
+    $label1->show();
+
+    $window_about->show();
+    
+}
 
 sub create_treeitem()
 {
-    my ($parent_tree, $pixmap, $label) =@_;
+    my ($parent_tree, ($pixmap, $label)) =@_;
     
     my (
 	$tree_item,
@@ -217,7 +237,7 @@ sub create_treeitem()
 
 sub create_subtree
 {
-	my($item, $box, $level) = @_;
+	my($item, $label) = @_;
 
 	my(
 		$item_subtree,
@@ -378,6 +398,7 @@ sub item_factory_cb {
 
 	print "ItemFactory: activated ", $widget->item_factory_path(), " -> ", $action, "\n";
 	$action == 1 and Gtk->exit(0);
+	$action == 4 and about_mdk_cc();
 }