-# Copyright (C) 2019 all contributors <meta@public-inbox.org>
+# Copyright (C) 2019-2021 all contributors <meta@public-inbox.org>
# License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
# Self-updating module containing a sample CSS for client-side
sub CSS () {
<<'_'
/*
+ * CC0-1.0 <https://creativecommons.org/publicdomain/zero/1.0/legalcode>
* Dark color scheme using 216 web-safe colors, inspired
* somewhat by the default color scheme in mutt.
* It reduces eyestrain for me, and energy usage for all:
* https://en.wikipedia.org/wiki/Light-on-dark_color_scheme
*/
- * { background:#000 !important; color:#ccc !important }
+ * { font-size: 100% !important;
+ font-family: monospace !important;
+ background:#000 !important;
+ color:#ccc !important }
+ pre { white-space: pre-wrap !important }
/*
* Underlined links add visual noise which make them hard-to-read.
* Use colors to make them stand out, instead.
*/
- a { color:#69f !important; text-decoration:none !important }
+ a:link { color:#69f !important;
+ text-decoration:none !important }
a:visited { color:#96f !important }
/* quoted text in emails gets a different color */
open my $rw, '+<', __FILE__ or die $!;
my $out = do { local $/; <$rw> } or die $!;
+ $css =~ s/; /;\n\t\t/g;
$out =~ s/^sub CSS.*^_\n\}/sub CSS () {\n\t<<'_'\n${css}_\n}/sm;
seek $rw, 0, 0;
print $rw $out or die $!;