From f72cb6d8b4ee6aad7af88e5cb8fc14518d034e7a Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Thu, 7 Nov 2013 17:48:16 +0100
Subject: perlish $adjustment->value => adjustment->get_value

---
 perl-install/standalone/drakclock | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/standalone/drakclock')

diff --git a/perl-install/standalone/drakclock b/perl-install/standalone/drakclock
index 6965d6b91..5e38ff6e3 100755
--- a/perl-install/standalone/drakclock
+++ b/perl-install/standalone/drakclock
@@ -315,7 +315,7 @@ sub determine_radian {
 
 sub draw {
     my ($widget, $event) = @_;
-    my ($x, $y, $width, $height) = $event->area->values;
+    my ($x, $y, $width, $height) = $event->area->get_values;
     $widget->get_window->draw_drawable($widget->style->fg_gc('normal'), $pixmap, $x, $y, $x, $y, $width, $height);
     0;
 }
-- 
cgit v1.2.1