From fa45fefa906393265c37099d225633315866429a Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Sun, 21 Apr 2013 00:20:42 +0000
Subject: convert from ask_from() to ask_from_()

(needed for next commit)
---
 perl-install/install/any.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index fe05557f5..918a89103 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -125,8 +125,8 @@ Do you have a supplementary installation medium to configure?",
 	'nfs'   => N("Network (NFS)"),
     );
 
-    $o->ask_from(
-	'', $msg,
+    $o->ask_from_({ messages => $msg,
+		  },
 	[ {
 	    val => \my $suppl,
 	    list => [ map { $_->[0] } group_by2(@l) ],
-- 
cgit v1.2.1