From 8828cad40309af00a289a234c162554b382f0fba Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 9 Aug 2004 03:24:28 +0000
Subject: prototype perl_checker compliance

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

diff --git a/perl-install/interactive/http.pm b/perl-install/interactive/http.pm
index 393ede7f6..b5ade049c 100644
--- a/perl-install/interactive/http.pm
+++ b/perl-install/interactive/http.pm
@@ -25,8 +25,8 @@ sub open_stdout() {
 
 # cont_stdout must be called after open_stdout and before the first print
 sub cont_stdout {
-    my ($title) = @_;
-    print CGI::start_html('-title' => $title) if $no_header;
+    my ($o_title) = @_;
+    print CGI::start_html('-title' => $o_title) if $no_header;
     $no_header = 0;
 }
 
-- 
cgit v1.2.1