From 290e279a5c8ca9fd0533264f57d4df58b7431de3 Mon Sep 17 00:00:00 2001 From: pad Date: Tue, 31 Aug 1999 16:13:05 +0000 Subject: test1 du pad --- perl-install/interactive.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/interactive.pm') diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index 70f54b57b..8c4bf24db 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -27,7 +27,8 @@ use common qw(:common :functional); 1; -sub new($$) { + +sub new($) { my ($type) = @_; bless {}, ref $type || $type; -- cgit v1.2.1