From aaff6dff3ac0e9b19810fc1bc836f30c19918e5d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 31 Jul 2002 11:59:03 +0000
Subject: make new perl_checker happy

---
 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 041235cef..67198d00e 100644
--- a/perl-install/interactive/stdio.pm
+++ b/perl-install/interactive/stdio.pm
@@ -58,7 +58,7 @@ ask_fromW_begin:
 	}
     };
 
-    my @labels = ();
+    my @labels;
     my $format_label = sub { my ($e) = @_; return "`${$e->{val}}' $e->{label} $e->{text}\n" };
     my $do_widget = sub {
 	my ($e, $ind) = @_;
-- 
cgit v1.2.1