X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FWWW.pm;h=411db16f4eaffaaee7f788b0fb356d3751884ffd;hb=fb72c5fb4353103b7928780f83d5e79b78038823;hp=b4c050b1069286e7bfb33e5b4e38a19f3b1fcc7e;hpb=48dbde1b098d836660d3eefbacbd57e487b3eaed;p=public-inbox.git diff --git a/lib/PublicInbox/WWW.pm b/lib/PublicInbox/WWW.pm index b4c050b1..411db16f 100644 --- a/lib/PublicInbox/WWW.pm +++ b/lib/PublicInbox/WWW.pm @@ -198,6 +198,7 @@ sub get_thread { sub self_url { my ($cgi) = @_; + # Plack::Request ref($cgi) eq 'CGI' ? $cgi->self_url : $cgi->uri->as_string; } @@ -362,7 +363,7 @@ sub r301 { if (ref($cgi) eq 'CGI') { $url = $cgi->url(-base) . '/'; $qs = $cgi->query_string; - } else { + } else { # Plack::Request $url = $cgi->base->as_string; $qs = $cgi->env->{QUERY_STRING}; }