From e5d2e80a09845619e90d736ac9c0f5fb3665574d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Wed, 1 Aug 2012 18:56:16 +0200
Subject: perlish ->window => ->get_window

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

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

diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index f57c9cecc..928c29336 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -616,7 +616,7 @@ sub installPackages {
     $details->hide if !@install::any::advertising_images;
     $w->sync;
     foreach ($cancel, $details) {
-	gtkset_mousecursor_normal($_->window);
+	gtkset_mousecursor_normal($_->get_window);
     }
 
     $advertize->(0);
-- 
cgit v1.2.1