WIP colouring in

[ypp-sc-tools.db-test.git] / yarrg / web / autohandler

diff --git a/yarrg/web/autohandler b/yarrg/web/autohandler
index f69ef55a53d92529c3a68f29d673e4238504d2ed..8096e66a61ba23b41181904fab5b596c5a2a5405 100644 (file)
--- a/yarrg/web/autohandler
+++ b/yarrg/web/autohandler
@@ -42,7 +42,8 @@ if ($printable =~ m/^pdf|^ps/) {
        my $output;
        my $got= $m->call_self(\$output);
        if ($got) {
-               my @htargs= qw(htmldoc --continuous --gray --size 210x279mm);
+               my @htargs= qw(htmldoc --continuous --gray --size 210x279mm
+                               --left 1cm --right 1cm);
                $printable =~ m/^[a-z]+/;
                push @htargs, '-t',$&;
                if ($printable =~ m/2$/) {
@@ -93,5 +94,11 @@ $r->content_type('text/html; charset=UTF-8');
     which contains mostly contributions from YARRG users and is not
     covered by the AGPL.
 -->
-
+<style type="text/css">
+  body { margin: 0; }
+  div.navoptbar { padding: 1em; background: #e0e0ff; }
+  address { background: #d7d8b3; padding: 1em; }
+  div.docs { padding: 1em; }
+  hr { display: none; }
+</style>
 % $m->call_next();