summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xcontrol-center347
1 files changed, 15 insertions, 32 deletions
diff --git a/control-center3 b/control-center3
index a5659358..4fc1c47a 100755
--- a/control-center3
+++ b/control-center3
@@ -107,11 +107,8 @@ my ($pix_splash_map, $pix_splash_mask) = Gtk::Gdk::Pixmap->create_from_xpm(NULL,
my $pix_splash = new Gtk::Pixmap ($pix_splash_map, $pix_splash_mask);
my $pix_about = new Gtk::Pixmap ($pix_about_map, $pix_about_mask);
my $fixed1= new Gtk::Fixed();
-#my $hbox1= new Gtk::HBox(0,20);
-#$window_global->window->set_back_pixmap($pix_splash,1);
$pix_about->set_alignment(10,0);
$fixed1->put($pix_about, 0, 0);
-#$hbox1->pack_start($pix_about, 0, 1, 0);
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 ("The Mandrake Control Center");
@@ -119,18 +116,9 @@ $label_about2->set_alignment(0,0);
$label_about2->set_style($style);
$fixed1->put($pix_splash, 0, 0);
$fixed1->put($label_about2, 50, 130);
-#$hbox1->pack_start($label_about2, 0, 1, 0);
-#my $vbox_about = new Gtk::VBox(0,10);
-#$vbox_about->pack_start($hbox1, 0, 1, 0);
-#$vbox_about->pack_start($fixed1, 0, 1, 0);
my $label_about3 = new Gtk::Label ("The place where you can configure your Mandrake Box");
-#$vbox_about->pack_start($label_about3, 0, 0, 0);
$fixed1->put($label_about3, 60, 160);
-#$table_info1 = new Gtk::Table(6,2,1);
-#$table_info1->set_row_spacings(18);
-#$table_info1->set_col_spacings(12);
-
my @revtree;
my @infotree;
open VERS, "/etc/redhat-release" or die "cannot open this file for read :$!";
@@ -145,38 +133,33 @@ my $username= POSIX::cuserid();
my $style1 = new Gtk::Style;
$style1->font(Gtk::Gdk::Font->load('-adobe-times-bold-r-normal--14-100-100-100-p-76-iso8859-1'));
-my $ld = new Gtk::Label("$username");
-$fixed1->put($pix_about, 50, 220);
-#$table_info1->attach($ld, 1, 2, 0, 1, 0, 0, 0, 0);
my $label_user = new Gtk::Label("User: ");
$label_user->set_style($style1);
-$label_user->set_justify('right');
-#$table_info1->attach($label_user, 0, 1, 0, 1, 0, 0, 0, 0);
-my $ld1 = new Gtk::Label("$info_tree[0] $info_tree[1] $info_tree[3] $info_tree[4] ");
-#$table_info1->attach($ld1, 1, 2, 1, 2, 0, 0, 0, 0);
-my $ld2 = new Gtk::Label("$nodename");
-#$table_info1->attach($ld2, 1, 2, 2, 3, 0, 0, 0, 0);
-my $ld3 = new Gtk::Label("$release $version");
-#$table_info1->attach($ld3, 1, 2, 3, 4, 0, 0, 0, 0);
-my $ld4 = new Gtk::Label("$machine");
-#$table_info1->attach($ld4, 1, 2, 4, 5, 0, 0, 0, 0);
+$fixed1->put($label_user, 50, 190);
+my $ld = new Gtk::Label("$username");
+$fixed1->put($ld, 170, 190);
my $label_os = new Gtk::Label("System: ");
$label_os->set_style($style1);
$label_os->set_justify('right');
-#$table_info1->attach($label_os, 0, 1, 1, 2, 0, 0, 0, 0);
+$fixed1->put($label_os, 50, 210);
+my $ld1 = new Gtk::Label("$info_tree[0] $info_tree[1] $info_tree[3] $info_tree[4] ");
+$fixed1->put($ld1, 170, 210);
my $label_host = new Gtk::Label("Hostname: ");
$label_host->set_style($style1);
-#$table_info1->attach_defaults($label_host, 0, 1, 2, 3);
+$fixed1->put($label_host, 50, 230);
+my $ld2 = new Gtk::Label("$nodename");
+$fixed1->put($ld2, 170, 230);
my $label_kernel = new Gtk::Label("Kernel Version : ");
$label_kernel->set_style($style1);
-#$table_info1->attach_defaults($label_kernel, 0, 1, 3, 4);
+$fixed1->put($label_kernel, 50, 260);
+my $ld3 = new Gtk::Label("$release $version");
+$fixed1->put($ld3, 170, 260);
my $label_box = new Gtk::Label("Machine: ");
$label_box->set_style($style1);
-#$table_info1->attach_defaults($label_box, 0, 1, 4, 5);
+$fixed1->put($label_box, 50, 290);
+my $ld4 = new Gtk::Label("$machine");
+$fixed1->put($ld4, 170, 290);
-#$vbox_about->set_spacing(30);
-#$vbox_about->pack_start($table_info1, 0, 0, 0);
-#$vbox_about->reorder_child($table_info1,150);
$notebook_global->append_page($fixed1, "");
my $vbox_global_left = new Gtk::VBox(0,0);