summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-09-29 14:18:09 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-09-29 14:18:09 +0000
commitb5bc676d61e1e5f1f1840e8723f81dc24c344f98 (patch)
tree6f4c9dccdd4ab049e3a04ec242503bb64c4f988d /perl-install/ugtk2.pm
parent008c48568c58665dcd4542f653f69bded0187dea (diff)
downloaddrakx-b5bc676d61e1e5f1f1840e8723f81dc24c344f98.tar
drakx-b5bc676d61e1e5f1f1840e8723f81dc24c344f98.tar.gz
drakx-b5bc676d61e1e5f1f1840e8723f81dc24c344f98.tar.bz2
drakx-b5bc676d61e1e5f1f1840e8723f81dc24c344f98.tar.xz
drakx-b5bc676d61e1e5f1f1840e8723f81dc24c344f98.zip
perl_checker fixes
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index b47739413..c6fd1410d 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -807,7 +807,7 @@ sub new {
$o->_create_window($title);
while (my $e = shift @tempory::objects) { $e->destroy }
- $o->{pop_it} ||= $pop_it || (!$::isWizard && !$::isEmbedded) || $::WizardTable && do {
+ $o->{pop_it} ||= $pop_it || !$::isWizard && !$::isEmbedded || $::WizardTable && do {
my @l = $::WizardTable->get_children;
pop @l if !$::isInstall && $::isWizard; #- don't take into account the DrawingArea
any { $_->visible } @l;