From 395e1a77a683369614b6fa1ab37f9d33a6cc790b Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 8 Nov 2013 03:47:53 +0100
Subject: perlish $dialog->action_area => $dialog->get_action_area

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

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

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 49a871b7c..830baf933 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -614,7 +614,7 @@ sub dialog {
     $dialog->signal_connect(delete_event => \&exitdialog);
     $dialog->set_size_request(@{$o_options->{size}}) if ref $o_options->{size};
     gtkpack_($dialog->get_child, @$widgets);
-    gtkpack($dialog->action_area, @$buttons) if $buttons;
+    gtkpack($dialog->get_action_area, @$buttons) if $buttons;
     $dialog->show_all;
     if ($o_main_loop) {
       gtkflush();
-- 
cgit v1.2.1