Looks sensible to me; Jakub, ack?

Roland Mas <lola...@debian.org> writes:

> Hi all,
>
>   This simple two-line patch fixes a bug that makes gitweb unusable on
> systems where the installed CGI.pm is version 4.04 or later (such as on
> Debian unstable).  That version removed the startform method, which had
> previously been deprecated in favour of start_form since 2009.
>
>   I don't have any specific tests for that change, but it does help
> fixing the testsuite of FusionForge (which includes a test of its Git
> plugin, involving gitweb).
>
>   For reference, this is Debian bug #765525 (http://bugs.debian.org/765525).
>
>   (I'm not subscribed to the git@vger mailing-list; please Cc me on
> replies.)
>
>   Thanks,
>
> Roland.
>
> From 1b74cfb8568927a307f165e428455789398f6d61 Mon Sep 17 00:00:00 2001
> From: Roland Mas <lola...@debian.org>
> Date: Thu, 16 Oct 2014 00:05:25 +0200
> Subject: [PATCH] Update gitweb.perl to current CGI.pm API
>
> CGI.pm 4.04 removed the startform method, which had previously been
> deprecated in favour of start_form.  Updated gitweb.perl accordingly.
>
> Signed-off-by: Roland Mas <lola...@debian.org>
> ---
>  gitweb/gitweb.perl | 4 ++--
>  1 file changed, 2 insertions(+), 2 deletions(-)
>
> diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
> index a9f57d6..ccf7516 100755
> --- a/gitweb/gitweb.perl
> +++ b/gitweb/gitweb.perl
> @@ -4100,7 +4100,7 @@ sub print_search_form {
>       if ($use_pathinfo) {
>               $action .= "/".esc_url($project);
>       }
> -     print $cgi->startform(-method => "get", -action => $action) .
> +     print $cgi->start_form(-method => "get", -action => $action) .
>             "<div class=\"search\">\n" .
>             (!$use_pathinfo &&
>             $cgi->input({-name=>"p", -value=>$project, -type=>"hidden"}) . 
> "\n") .
> @@ -5510,7 +5510,7 @@ sub git_project_search_form {
>       }
>  
>       print "<div class=\"projsearch\">\n";
> -     print $cgi->startform(-method => 'get', -action => $my_uri) .
> +     print $cgi->start_form(-method => 'get', -action => $my_uri) .
>             $cgi->hidden(-name => 'a', -value => 'project_list')  . "\n";
>       print $cgi->hidden(-name => 'pf', -value => $project_filter). "\n"
>               if (defined $project_filter);
--
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majord...@vger.kernel.org
More majordomo info at  http://vger.kernel.org/majordomo-info.html

Reply via email to