From 5f1f2f2560c1c7f6a688eaccc089ca5a43d7f8e2 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 30 Aug 2013 16:46:21 +0200
Subject: visible() => get_visible()

---
 perl-install/mygtk3.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm
index 55bc12884..75a613c16 100644
--- a/perl-install/mygtk3.pm
+++ b/perl-install/mygtk3.pm
@@ -891,7 +891,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') && $_->visible } $::WizardTable->get_children;
+	any { !$_->isa('Gtk3::DrawingArea') && $_->get_visible } $::WizardTable->get_children;
     };
 
     my $pop_and_reuse = delete $opts->{pop_and_reuse} && $pop_it;
-- 
cgit v1.2.1