summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xcest_ton_boot4
-rwxr-xr-xcontrol-center321
2 files changed, 12 insertions, 13 deletions
diff --git a/cest_ton_boot b/cest_ton_boot
index 369cd8d0..a43b4e01 100755
--- a/cest_ton_boot
+++ b/cest_ton_boot
@@ -74,6 +74,8 @@ $window->set_title( I_("ce soir tu choisis ton boot") );
#$window->set_policy('automatic', 'automatic');
$window->set_policy(0, 0, 0);
$window->border_width (10);
+$window->realize;
+
### menus definition
# the menus are not shown
@@ -141,7 +143,7 @@ $a_box->set_sensitive (0);
$a_dedans->pack_start ($a_box, 0, 0, 0);
# now for the pixmap from gdk
-my ( $pixmap, $mask ) = Gtk::Gdk::Pixmap->create_from_xpm_d( NULL, $window->get_style()->bg( 'normal' ), @xpm_data );
+my ( $pixmap, $mask ) = Gtk::Gdk::Pixmap->create_from_xpm( $window->window, $window->get_style()->bg( 'normal' ), "./c.xpm" );
# a pixmap widget to contain the pixmap
my $pixmapwid = new Gtk::Pixmap( $pixmap, $mask );
diff --git a/control-center3 b/control-center3
index 02b86255..651dcc3a 100755
--- a/control-center3
+++ b/control-center3
@@ -28,6 +28,8 @@ use POSIX;
init Gtk;
use Data::Dumper;
+my $false = 0;
+
my $_xbindir = "/usr/X11R6/bin";
my $_bindir = "/usr/bin";
my $_sbindir = "/usr/sbin";
@@ -46,6 +48,8 @@ $window_global->signal_connect ( delete_event => sub { quit_global(); });
$window_global->set_position(1);
$window_global->set_title("Mandrake Control Center");
$window_global->border_width(0);
+#$window_global->realize;
+
$vbox_global = new Gtk::VBox(0, 0);
$window_global->add($vbox_global);
@@ -293,25 +297,18 @@ sub xpm_label_box
{
my ( $parent, $xpm_filename, $label_text ) = @_;
- my $box;
- my $style;
- my $pixmap;
- my $mask;
- my $pixmapwid;
- my $label;
-
# Create box for xpm and label
- $box = new Gtk::HBox( $false, 0 );
+ my $box = new Gtk::HBox( $false, 0 );
# Get the style of the button to get the background color.
- $style = $parent->get_style()->bg( 'normal' );
+ my $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 );
- $pixmapwid = new Gtk::Pixmap( $pixmap, $mask );
+ my ($pixmap, $mask ) = Gtk::Gdk::Pixmap->create_from_xpm($parent->window, $style, $xpm_filename );
+ my $pixmapwid = new Gtk::Pixmap( $pixmap, $mask );
# Create a label for the button
- $label = new Gtk::Label( $label_text );
+ my $label = new Gtk::Label( $label_text );
# Pack the pixmap and label into the box
$box->pack_start( $pixmapwid, $false, $false, 3 );