diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-08-27 03:40:55 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-08-27 03:40:55 +0000 |
commit | ae2d143860cc759166784c2d11c9acc2de0a4211 (patch) | |
tree | f7a23a74aed2de36ba627166e946e2ff9c83426e /perl-install/interactive | |
parent | caa4e01ea7ce33370a842d302b46157c77fece58 (diff) | |
download | drakx-ae2d143860cc759166784c2d11c9acc2de0a4211.tar drakx-ae2d143860cc759166784c2d11c9acc2de0a4211.tar.gz drakx-ae2d143860cc759166784c2d11c9acc2de0a4211.tar.bz2 drakx-ae2d143860cc759166784c2d11c9acc2de0a4211.tar.xz drakx-ae2d143860cc759166784c2d11c9acc2de0a4211.zip |
fill in missing titles for banners and specify icons
Diffstat (limited to 'perl-install/interactive')
-rw-r--r-- | perl-install/interactive/gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index 1242b6387..cf252c0bc 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -398,7 +398,7 @@ sub ask_fromW { my ($o, $common, $l, $l2) = @_; my $ignore = 0; #-to handle recursivity - my $mainw = ugtk2->new($common->{title}, %$o, modal => 1, if__($::main_window, transient => $::main_window)); + my $mainw = ugtk2->new($common->{title}, %$o, modal => 1, if__($::main_window, transient => $::main_window), if_($common->{icon}, icon => $common->{icon})); #-the widgets my (@widgets, @widgets_always, @widgets_advanced, $advanced); |