diff options
Diffstat (limited to 'lib/PublicInbox/RepobrowseBase.pm')
-rw-r--r-- | lib/PublicInbox/RepobrowseBase.pm | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/lib/PublicInbox/RepobrowseBase.pm b/lib/PublicInbox/RepobrowseBase.pm index 6223ebde..14926d70 100644 --- a/lib/PublicInbox/RepobrowseBase.pm +++ b/lib/PublicInbox/RepobrowseBase.pm @@ -58,11 +58,21 @@ sub mime_type { # starts an HTML page for Repobrowse in a consistent way sub html_start { - my ($self, $req, $title_html) = @_; + my ($self, $req, $title_html, $opts) = @_; my $desc = $req->{repo_info}->{desc_html}; + my $meta; + + if ($opts) { + my @robots; + foreach (qw(nofollow noindex)) { + push @robots, $_ if $opts->{$_}; + } + $meta = qq(<meta\nname=robots\ncontent=") . + join(',', @robots) . '" />'; + } "<html><head><title>$title_html</title>" . - PublicInbox::Hval::STYLE . + PublicInbox::Hval::STYLE . $meta . "</head><body><pre><b>$desc</b>"; } |