summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-17 09:43:59 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-17 09:43:59 +0000
commitb44e0a00a4b43dfe86dd5e553e061d0770abb73b (patch)
treeeb59ea7f8697a36dd4ccb6b258f09c99bd781d58 /perl-install
parent8e769e8f22d430f90e7e639f9a6f93ef8ddc9704 (diff)
downloaddrakx-b44e0a00a4b43dfe86dd5e553e061d0770abb73b.tar
drakx-b44e0a00a4b43dfe86dd5e553e061d0770abb73b.tar.gz
drakx-b44e0a00a4b43dfe86dd5e553e061d0770abb73b.tar.bz2
drakx-b44e0a00a4b43dfe86dd5e553e061d0770abb73b.tar.xz
drakx-b44e0a00a4b43dfe86dd5e553e061d0770abb73b.zip
(new) fix x11 icon for Gtk2::Plug
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 64b6fec79..b68db5a92 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -910,6 +910,7 @@ sub new {
if (!$::Plug && $o->{isEmbedded}) {
$::Plug = $::WizardWindow = gtkshow(Gtk2::Plug->new($::XID));
+ $::Plug->set_icon(gtkcreate_pixbuf($o->{wm_icon}));
flush();
gtkadd($::Plug, $::WizardTable);
} elsif (!$::WizardWindow) {
@@ -932,8 +933,6 @@ sub new {
$::WizardWindow->set_position('center_always') if !$::isStandalone;
gtkpack__($::WizardTable, Gtk2::Banner->new($::Wizard_pix_up || "wiz_default_up.png", $::Wizard_title));
$::WizardWindow->set_icon(gtkcreate_pixbuf($o->{wm_icon}));
- } else {
- $::Plug->set_icon(gtkcreate_pixbuf($o->{wm_icon}));
}
$::WizardWindow->show;
}