remove direct CGI.pm support

[public-inbox.git] / lib / PublicInbox / Feed.pm

diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm
index a0aa62af4e2697eac563d0708a00407246ab4993..a5828a8e16bf9f475c1897b60f7cd4279e064c24 100644 (file)
--- a/lib/PublicInbox/Feed.pm
+++ b/lib/PublicInbox/Feed.pm
@@ -284,14 +284,7 @@ sub get_feedopts {
 
        my $url_base;
        if ($cgi) {
-               my $base;
-               if (ref($cgi) eq 'CGI') {
-                       $base = $cgi->url(-base);
-               } else { # Plack::Request
-                       $base = $cgi->base->as_string;
-                       $base =~ s!/\z!!;
-               }
-               $url_base = "$base/$listname";
+               $url_base = $cgi->base->as_string . $listname;
                if (my $mid = $ctx->{mid}) { # per-thread feed:
                        $rv{atomurl} = "$url_base/$mid/t.atom";
                } else {