diff options
Diffstat (limited to 'control-center3')
| -rwxr-xr-x | control-center3 | 41 |
1 files changed, 30 insertions, 11 deletions
diff --git a/control-center3 b/control-center3 index cc335a97..846c07c1 100755 --- a/control-center3 +++ b/control-center3 @@ -30,6 +30,7 @@ use Data::Dumper; my %pixmaps_global; my $xpm_path="/usr/share/icons/"; +my $xpm_path_l="./pixmaps"; my $tree_depth_max = 1; my @treeitem_sub; @@ -48,7 +49,6 @@ $window_global->add($vbox_global); my @item_factory_entries = ( ["/_File", undef, 0, "<Branch>"], ["/File/tearoff1", undef, 0, "<Tearoff>"], - #["/File/_Quit", "<control>Q", 5], { 'path' => "/File/_Quit", 'accelerator' => "<control>Q", @@ -57,7 +57,7 @@ my @item_factory_entries = ( }, ["/_Help", undef, 0, "<Branch>"], ["/Help/_Mandrake Control Center", undef, 2], - ["/Help/_Report Bug", undef, 3 ], + ["/Help/_Report Bug", undef, 3 ], ["/Help/_About", undef, 4 ] ); @@ -98,7 +98,7 @@ $hpane_global->pack2($notebook_global,0,1); #-------------------------------- splash screeen -------------------------------------------------------- my $hbox1= new Gtk::HBox(0,20); -my ($pix_about_map, $pix_about_mask) = Gtk::Gdk::Pixmap->create_from_xpm(NULL, Gtk::Widget->get_default_style->bg('normal'), "$xpm_path/logo.xpm"); +my ($pix_about_map, $pix_about_mask) = Gtk::Gdk::Pixmap->create_from_xpm(NULL, Gtk::Widget->get_default_style->bg('normal'), "$xpm_path_l/logo.xpm"); my $pix_about = new Gtk::Pixmap ($pix_about_map, $pix_about_mask); $pix_about->set_alignment(10,0); $hbox1->pack_start($pix_about, 0, 1, 0); @@ -106,7 +106,7 @@ my $style = new Gtk::Style; $style->font(Gtk::Gdk::Font->load('-adobe-times-bold-r-normal--25-180-100-100-p-132-iso8859-1')); my $label_about2 = new Gtk::Label ("Mandrake Control Center"); $label_about2->set_alignment(0,0); -$label_about2->set_style($style); + $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); @@ -114,8 +114,8 @@ my $label_about3 = new Gtk::Label ("The place where you can configure your Mandr $vbox_about->pack_start($label_about3, 0, 0, 0); $table_info1 = new Gtk::Table(6,2,1); -$table_info1->set_row_spacings(15); -$table_info1->set_col_spacings(10); +$table_info1->set_row_spacings(18); +$table_info1->set_col_spacings(12); my @revtree; my @infotree; @@ -172,7 +172,7 @@ $window_global->realize; my $tree= new Gtk::Tree; $vbox_global_left->pack_start($tree,1,1,0); map { - create_tree_item($tree,$_->[0], "$xpm_path/$_->[1]",1); + create_tree_item($tree, $_->[0] , "$xpm_path_l/$_->[1]",1); } (['Boot', 'logo.xpm'] , ['Hardware', 'logo.xpm'] , ['User and Groups','logo.xpm'], ['Network & Internet','logo.xpm'] , ['Menu Customization','logo.xpm'] , ['Font Management','logo.xpm']); @@ -187,8 +187,8 @@ map { %tree_exec = ("Drakboot" => "drakeboot", "Drakfloppy" => "drakfloppy", "Drakelogo" => "DrakeLogo" , "xfdrake" => "XFDrake" , - "Hardrake" => "harddrake-auth" , "Mousedrake" => "mousedrake" , - "Printdrake" => "printerdrake" , "Kbddrake" => "keyboarddrake" , + "Harddrake" => "harddrake-auth" , "Mousedrake" => "mousedrake" , + "Printerdrake" => "printerdrake" , "Kbddrake" => "keyboarddrake" , "Userdrake" => "userdrake" , "Draknet" => "draknet" , "Drakgw" => "drakgw" , "Menudrake" => "menudrake" , "Drakfont" => "drakfont" ); @@ -196,7 +196,7 @@ my @pid_launched; %tree_launched = ("Drakboot" => -1, "Drakfloppy" => -1, "Drakelogo" => -1 , "xfdrake" => -1 , "Hardrake" => -1 , "Mousedrake" => -1 , - "Printdrake" => -1 , "Kbddrake" => -1 , + "Printerdrake" => -1 , "Kbddrake" => -1 , "Userdrake" => -1 , "Draknet" => -1 , "Drakgw" => -1 , "Menudrake" => -1 , "Drakfont" => -1 ); @@ -242,6 +242,23 @@ sub about_mdk_cc() $window_about->set_modal(1); } +sub help_mandrake_cc () +{ + my $docdir="/usr/share/doc"; + my $browser="netscape"; + + system("$browser $_docdir/Drakconf/help.html &"); + +} + +sub bug_report() +{ + my $bug_url="https://qa.mandrakesoft.com/dimension"; + my $browser="netscape"; + system("$browser $bug_url &"); + +} + sub create_tree_item() { my ($parent_tree, $label, $pixmap, $tree_depth_max) =@_; @@ -289,7 +306,7 @@ sub xpm_label_box $style = $parent->get_style()->bg( 'normal' ); # Now on to the xpm stuff - ( $pixmap, $mask ) = Gtk::Gdk::Pixmap->create_from_xpm($parent->window, $style, $xpm_filename ); + ($pixmap, $mask ) = Gtk::Gdk::Pixmap->create_from_xpm($parent->window, $style, $xpm_filename ); $pixmapwid = new Gtk::Pixmap( $pixmap, $mask ); # Create a label for the button @@ -341,6 +358,8 @@ sub item_factory_cb { print "ItemFactory: activated ", $widget->item_factory_path(), " -> ", $action, "\n"; $action == 1 and quit_global(); $action == 4 and about_mdk_cc(); + $action == 2 and help_mandrake_cc(); + $action == 3 and bug_report(); } |