From bb299753dadf4f2aabfb86c993d622bfe8c0d98f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Tue, 12 Nov 2013 00:57:50 +0100
Subject: perlish ->state() => ->get_state()

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

(limited to 'perl-install')

diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm
index aa5a30042..c628b7cb3 100644
--- a/perl-install/ugtk3.pm
+++ b/perl-install/ugtk3.pm
@@ -1542,7 +1542,7 @@ sub RENDER { # not that efficient...
       ? 'selected'
       : 'active';
   } else {
-    $state = $widget->state eq 'insensitive'
+    $state = $widget->get_state eq 'insensitive'
       ? 'insensitive'
       : 'normal';
   }
-- 
cgit v1.2.1