From 57cc6e6e43ea687e8b9d55346698338d7d9d9dce Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Wed, 1 Aug 2012 18:49:47 +0200
Subject: perlish realized() => get_realized()

---
 perl-install/ugtk3.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm
index a19356490..b092b5da3 100644
--- a/perl-install/ugtk3.pm
+++ b/perl-install/ugtk3.pm
@@ -681,7 +681,7 @@ sub set_back_pixbuf {
 
 sub set_back_pixmap {
     my ($w) = @_;
-    return if !$w->realized;
+    return if !$w->get_realized;
     my $window = $w->window;
     my $pixmap = $w->{back_pixmap} ||= Gtk3::Gdk::Pixmap->new($window, 1, 2, $window->get_depth);
 
@@ -1425,7 +1425,7 @@ use ugtk3 qw(:helpers :wrappers);
 
 sub set_pixmap {
     my ($darea) = @_;
-    return if !$darea->realized;
+    return if !$darea->get_realized;
     ugtk3::set_back_pixbuf($darea, $darea->{back_pixbuf});
     update_text($darea);
 }
-- 
cgit v1.2.1