diff options
-rwxr-xr-x | control-center3 | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/control-center3 b/control-center3 index a83327eb..f79e90b6 100755 --- a/control-center3 +++ b/control-center3 @@ -20,10 +20,6 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. -use lib qw(/usr/lib/libDrakX); -use interactive; -use my_gtk qw(:helpers :wrappers); - use Config; use Env; use POSIX; @@ -148,7 +144,7 @@ map { [_("Display"),'XFdrake-mdk.png',2] , [_("Hardware"),'harddrake-mdk.png',2] , [_("Mouse"), 'mousedrake-mdk.png',2] , [_("Printer"),'printer-mdk.png',2] , [_("Keyboard"), 'keyboard-mdk.png',2], # [_("Users Config"),'item.png',3] , - [_("Internet & Network") , 'draknet-mdk.png',1] , [_("Gateway Config"),'drakgw-mdk.png',1], + [_("Connection") , 'draknet-mdk.png',1] , [_("Connection Sharing"),'drakgw-mdk.png',1], [_("System Menus") , 'menudrake-mdk.png',0], [_("User Menus") , 'menudrake-mdk.png',0] , [_("Services") , 'service-mdk.png' , 0], [_("Fonts"), 'drakfont-mdk.png',0], [_("Date & Time") , 'time-mdk.png',0], # [_("Root Password") , 'passwd-mdk.png',0] ); @@ -201,7 +197,7 @@ sub draw_exposed { 0, 0, 0, 0, 540, 460); my $style = new Gtk::Style; my $style_dflt = new Gtk::Style; - $style->font(Gtk::Gdk::Font->fontset_load(_("-adobe-times-bold-r-normal--17-*-100-100-p-*-iso8859-*,*-r-*"))); + $style->font(Gtk::Gdk::Font->fontset_load("-adobe-times-bold-r-normal--17-*-100-100-p-*-iso8859-*,*-r-*")); $pix->draw_string($style->font, $darea1->style->black_gc, 73, 170, ("The place where you can configure your Mandrake Box") ); my @revtree; @@ -213,7 +209,7 @@ sub draw_exposed { # my $username= POSIX::cuserid(); my $style1 = new Gtk::Style; - $style1->font(Gtk::Gdk::Font->fontset_load(_("-adobe-times-bold-r-normal--14-*-100-100-p-*-iso8859-*,*-r-*"))); + $style1->font(Gtk::Gdk::Font->fontset_load("-adobe-times-bold-r-normal--14-*-100-100-p-*-iso8859-*,*-r-*")); my $i=0; foreach( #[_("User:"), $username], @@ -252,7 +248,7 @@ sub about_mdk_cc { my $label = new Gtk::Label( _("Mandrake Control Center 0.61 \n Copyright (C) 2001 Mandrakesoft SA\n") ); my $style1 = new Gtk::Style; - $style1->font(Gtk::Gdk::Font->fontset_load(_("-adobe-times-bold-r-normal--14-*-100-100-p-*-iso8859-*,*-r-*"))); + $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 ); @@ -433,9 +429,14 @@ sub exec_treeitem { $hbox->show; $vbox2->pack_start($hbox,0,0,0); my $darea1= new Gtk::DrawingArea(); - $darea1->size(350,13); - $darea1->set_usize(340,15); - $hbox->pack_start(gtkshow(gtkadd(gtkset_shadow_type(new Gtk::Frame, 'etched_out'),$darea1)),1,0,0); + $darea1->size(350,12); + $darea1->set_usize(340,12); + $frame0 = new Gtk::Frame; + $frame0->add($darea1); + $frame0->show; + $darea1->show; + $frame0->set_shadow_type('etched_out'); + $hbox->pack_start($frame0,1,0,0); my $socket = new Gtk::Socket; $global_socket = \$socket; $vbox->pack_start($socket, 1, 1, 0); |