summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xcontrol-center323
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);