use constant {
DATEFMT => '%Y-%m-%dT%H:%M:%SZ', # atom standard
MAX_PER_PAGE => 25, # this needs to be tunable
+ PRE_WRAP => '<pre style="white-space:pre-wrap">',
};
# main function
my $html = "<html><head><title>$title</title>" .
'<link rel="alternate" title="Atom feed" href="' .
$feed_opts->{atomurl} . '" type="application/atom+xml"/>' .
- '</head><body><pre>';
+ '</head><body>' . PRE_WRAP;
# sort by date, most recent at top
$th->order(sub {
my $footer = nav_footer($args->{cgi}, $last, $feed_opts);
my $list_footer = $args->{footer};
$footer .= "\n" . $list_footer if ($footer && $list_footer);
- $footer = "<hr /><pre>$footer</pre>" if $footer;
+ $footer = "<hr />" . PRE_WRAP . "$footer</pre>" if $footer;
$html . "</pre>$footer</html>";
}
# TODO: make these constants tunable
use constant MAX_INLINE_QUOTED => 5;
use constant MAX_TRUNC_LEN => 72;
+use constant PRE_WRAP => '<pre style="white-space:pre-wrap">';
*ascii_html = *PublicInbox::Hval::ascii_html;
}
headers_to_html_header($mime, $full_pfx) .
multipart_text_as_html($mime, $full_pfx) .
- '</pre><hr /><pre>' .
+ '</pre><hr />' . PRE_WRAP .
html_footer($mime) . $footer .
'</pre></body></html>';
}
sub feed_entry {
my ($class, $mime, $full_pfx) = @_;
- '<pre>' . multipart_text_as_html($mime, $full_pfx) . '</pre>';
+ PRE_WRAP . multipart_text_as_html($mime, $full_pfx) . '</pre>';
}
$rv .= "\n";
("<html><head><title>". join(' - ', @title) .
- '</title></head><body><pre style="white-space:pre-wrap">' . $rv);
+ '</title></head><body>' . PRE_WRAP . $rv);
}
sub html_footer {