From e05ddb281beb452808a0f3669c93c907acf1fa77 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 26 May 2003 09:13:34 +0000
Subject: - methods with no argument are not functions with no argument! -
 perl_checker fixes

---
 perl-install/interactive/http.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/interactive/http.pm b/perl-install/interactive/http.pm
index c821467a8..3fef66fcb 100644
--- a/perl-install/interactive/http.pm
+++ b/perl-install/interactive/http.pm
@@ -41,7 +41,7 @@ sub new {
     bless {}, $_[0];
 }
 
-sub end() { 
+sub end { 
     -e $pipe_r or return; # don't run this twice
     my $q = CGI->new;
     cont_stdout("Exit");
@@ -93,7 +93,7 @@ sub ask_fromW {
 	} else {
 	    print $e->{hidden} ?
 	      $q->password_field('-name' => "w$::i", '-default' => ${$e->{val}}) :
-	      $q->textfield(     '-name' => "w$::i", '-default' => ${$e->{val}});
+		   $q->textfield('-name' => "w$::i", '-default' => ${$e->{val}});
 	}
 
 	print "</td></tr>\n";
-- 
cgit v1.2.1