summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
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;
}