From 7f6889cc228cfdfe02cf4db674c560643aa6a71d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 15 Nov 2002 12:39:00 +0000
Subject: s/wantarray/wantarray()/

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

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

diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 076b11f7d..e423d7eff 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -233,7 +233,7 @@ sub ask_many_from_list {
 	my $h = $_;
 	[ grep { ${$h->{e}{$_}{val}} } @{$h->{list}} ];
     } @l;
-    wantarray ? @l : $l[0];
+    wantarray() ? @l : $l[0];
 }
 
 sub ask_from_entry {
-- 
cgit v1.2.1