From bc357e50bf8e0a68f2878ef8d5fce82a903d9cd6 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Sun, 6 Oct 2013 00:12:26 +0200
Subject: better test for the banner widget

make this test work whatever is used to implement our banners
---
 perl-install/mygtk3.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/mygtk3.pm')

diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm
index 8b29c1211..e5b2e486b 100644
--- a/perl-install/mygtk3.pm
+++ b/perl-install/mygtk3.pm
@@ -885,7 +885,7 @@ sub _gtk__MagicWindow {
     my $pop_it = delete $opts->{pop_it} || !$::isWizard && !$::isEmbedded || $::WizardTable && do {
 	#- do not take into account the wizard banner
         # FIXME!!!
-	any { !$_->isa('Gtk3::DrawingArea') && $_->get_visible } $::WizardTable->get_children;
+	any { $_->get_name ne 'Banner' && $_->get_visible } $::WizardTable->get_children;
     };
 
     my $pop_and_reuse = delete $opts->{pop_and_reuse} && $pop_it;
-- 
cgit v1.2.1