From c1e398be894ecce6394bd76c99b76c022979ac62 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 11 Nov 2002 13:29:44 +0000
Subject: various small syntax enhancements to please perl_checker

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

(limited to 'perl-install/interactive')

diff --git a/perl-install/interactive/stdio.pm b/perl-install/interactive/stdio.pm
index 10e749205..737b966f7 100644
--- a/perl-install/interactive/stdio.pm
+++ b/perl-install/interactive/stdio.pm
@@ -115,7 +115,7 @@ ask_fromW_begin:
 
     print "* ";
     $common->{title} and print "$common->{title}\n";
-    print map { "$_\n" } @{$common->{messages}};
+    print(map { "$_\n" } @{$common->{messages}});
 
     $predo_widget->($_) foreach @$l;
     if (listlength(@$l) > 30) {
-- 
cgit v1.2.1