diff options
| author | Eric Wong <e@80x24.org> | 2016-02-26 10:38:41 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2016-04-05 18:58:27 +0000 |
| commit | 7d8cc28839176b7fa67c509aae2b4c050e3abbd1 (patch) | |
| tree | 45c7aa09481e77a1b9d644c5b822d543fec4ccef /lib/PublicInbox/RepobrowseBase.pm | |
| parent | f08dc18b4f5b3aa7a43bfa9ce754b23028f5babb (diff) | |
| download | public-inbox-7d8cc28839176b7fa67c509aae2b4c050e3abbd1.tar.gz | |
We already dropped CGI from the master branch, drop it from repobrowse as well to simplify code.
Diffstat (limited to 'lib/PublicInbox/RepobrowseBase.pm')
| -rw-r--r-- | lib/PublicInbox/RepobrowseBase.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/PublicInbox/RepobrowseBase.pm b/lib/PublicInbox/RepobrowseBase.pm index dd854ffc..7863d6ce 100644 --- a/lib/PublicInbox/RepobrowseBase.pm +++ b/lib/PublicInbox/RepobrowseBase.pm @@ -85,8 +85,7 @@ sub r { # The goal is to be able to make redirects like we make # <a href=> tags with '../' my $cgi = $req->{cgi}; - my $base; - $base = ref($cgi) eq 'CGI' ? $cgi->url(-base).'/' : $cgi->base; + my $base = $cgi->base; my ($redir) = @extra; if ($redir =~ m!\A\.\./!) { # relative redirect my @orig = split(m!/+!, $cgi->path_info, -1); |