diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2005-08-30 14:25:24 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2005-08-30 14:25:24 +0000 |
commit | 816ac124bf481cb48f0b6cfbb170ab194ac3450c (patch) | |
tree | 03752e751a9dbf08b9911f27df4b2d92422175ae | |
parent | 614fceef66cf52fae3f05d65e98b930e85c2ae8c (diff) | |
download | drakx-backup-do-not-use-816ac124bf481cb48f0b6cfbb170ab194ac3450c.tar drakx-backup-do-not-use-816ac124bf481cb48f0b6cfbb170ab194ac3450c.tar.gz drakx-backup-do-not-use-816ac124bf481cb48f0b6cfbb170ab194ac3450c.tar.bz2 drakx-backup-do-not-use-816ac124bf481cb48f0b6cfbb170ab194ac3450c.tar.xz drakx-backup-do-not-use-816ac124bf481cb48f0b6cfbb170ab194ac3450c.zip |
if_ is *not* short-circuit
-rw-r--r-- | perl-install/ugtk2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index add6a2ca4..b4c6ecf0c 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -850,7 +850,7 @@ sub new { 'MagicWindow', title => $title || '', pop_it => $o->{pop_it}, - if_($::isInstall, banner => Gtk2::Banner->new($icon, $title)), + $::isInstall ? (banner => Gtk2::Banner->new($icon, $title)) : (), child => gtknew('VBox'), modal => $grab || $o->{grab} || $o->{modal}, if_(!$::isInstall, icon_no_error => wm_icon()), |