diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-02-07 13:46:27 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-02-07 13:46:27 +0000 |
| commit | 1178db7cf34e57e7cf09f66cffa79112c67fc7ed (patch) | |
| tree | 57fc7242a0cd8d6848cfb8db0e0e37b7ea994a11 /perl-install/install_gtk.pm | |
| parent | e7d616a49ca57fe20fadcd41ac3c15bc7ecec210 (diff) | |
| download | drakx-backup-do-not-use-1178db7cf34e57e7cf09f66cffa79112c67fc7ed.tar drakx-backup-do-not-use-1178db7cf34e57e7cf09f66cffa79112c67fc7ed.tar.gz drakx-backup-do-not-use-1178db7cf34e57e7cf09f66cffa79112c67fc7ed.tar.bz2 drakx-backup-do-not-use-1178db7cf34e57e7cf09f66cffa79112c67fc7ed.tar.xz drakx-backup-do-not-use-1178db7cf34e57e7cf09f66cffa79112c67fc7ed.zip | |
(create_help_window, create_logo_window): use gtkxpm
Diffstat (limited to 'perl-install/install_gtk.pm')
| -rw-r--r-- | perl-install/install_gtk.pm | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm index 9884418fc..4e189c2d0 100644 --- a/perl-install/install_gtk.pm +++ b/perl-install/install_gtk.pm @@ -102,7 +102,7 @@ sub create_help_window { $w->{rwindow}->set_usize($::helpwidth, $::helpheight); $w->sync; } - my $pixmap = new Gtk::Pixmap(gtkcreate_xpm($w->{window}, "$ENV{SHARE_PATH}/help.xpm")); + my $pixmap = gtkxpm($w->{window}, "$ENV{SHARE_PATH}/help.xpm"); gtkadd($w->{window}, gtkpack_(new Gtk::HBox(0,-2), 0, gtkadd(gtksignal_connect(new Gtk::Button, clicked => sub { create_big_help($o) }), $pixmap), @@ -193,11 +193,7 @@ sub create_logo_window { my $file = $o->{meta_class} eq 'desktop' ? "logo-mandrake-Desktop.xpm" : "logo-mandrake.xpm"; $o->{meta_class} eq 'firewall' and $file = "logo-mandrake-Firewall.xpm"; -r $file or $file = "$ENV{SHARE_PATH}/$file"; - if (-r $file) { - my $ww = $w->{window}; - my @logo = Gtk::Gdk::Pixmap->create_from_xpm($ww->window, $ww->style->bg('normal'), $file); - gtkadd($ww, new Gtk::Pixmap(@logo)); - } + -r $file and gtkadd($w->{window}, gtkxpm($w->{window}, $file)); $o->{logo_window} = $w; } |