summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2012-08-01 18:49:47 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-11-24 21:28:34 +0100
commit57cc6e6e43ea687e8b9d55346698338d7d9d9dce (patch)
treef91b210fb39432b0c10418d68e91e6f536baaa9f /perl-install
parentabf078590ff4692d5ea40f277feac76687c25b04 (diff)
downloaddrakx-57cc6e6e43ea687e8b9d55346698338d7d9d9dce.tar
drakx-57cc6e6e43ea687e8b9d55346698338d7d9d9dce.tar.gz
drakx-57cc6e6e43ea687e8b9d55346698338d7d9d9dce.tar.bz2
drakx-57cc6e6e43ea687e8b9d55346698338d7d9d9dce.tar.xz
drakx-57cc6e6e43ea687e8b9d55346698338d7d9d9dce.zip
perlish realized() => get_realized()
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk3.pm4
1 files changed, 2 insertions, 2 deletions
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);
}