diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-09 03:24:28 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-09 03:24:28 +0000 |
commit | 8828cad40309af00a289a234c162554b382f0fba (patch) | |
tree | 83b0c8fbc2afe1e38fffe408edba0233269d6a2c /perl-install/interactive/http.pm | |
parent | 2808f751a28cf02e71a3ef28ad4f59d026a35311 (diff) | |
download | drakx-8828cad40309af00a289a234c162554b382f0fba.tar drakx-8828cad40309af00a289a234c162554b382f0fba.tar.gz drakx-8828cad40309af00a289a234c162554b382f0fba.tar.bz2 drakx-8828cad40309af00a289a234c162554b382f0fba.tar.xz drakx-8828cad40309af00a289a234c162554b382f0fba.zip |
prototype perl_checker compliance
Diffstat (limited to 'perl-install/interactive/http.pm')
-rw-r--r-- | perl-install/interactive/http.pm | 4 |
1 files 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; } |