Subtitle cosmetics.

darcs-hash:ff7f2de80b5dbb07f847bc15a347ae0220406487

1 files changed, 8 insertions, 7 deletions

diff --git a/journal.lisp b/journal.lisp
index 2b720e2..7fb0ab5 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -444,13 +444,14 @@ after another in any arbitrary order."
      (<:h1 :id :main-title
            (<:a :href "journal.cgi?action=index"
                 "Kompottkins Weisheiten"))
-     (<:div :id :main-subtitle (<:as-is
-                                (random-elt
-                                 '(("Geschwafel eines
-                                     libert&auml;rsozialistischen Geeks")
-                                   ("NEU!  Jetzt ohne regelm&auml;&szlig;ige
-                                     Serverabst&uuml;rze!")
-                                   ("NEU!  Jetzt mit mehr als 3 % Uptime!"))))))
+     (<:div :id :main-subtitle
+      (<:as-is "&bull;&bull;&bull; ")
+      (<:as-is
+       (random-elt
+        '("Geschwafel eines libert&auml;rsozialistischen Geeks"
+          "NEU!  Jetzt ohne regelm&auml;&szlig;ige Serverabst&uuml;rze!"
+          "NEU!  Jetzt mit mehr als 3 % Uptime!")))
+      (<:as-is " &bull;&bull;&bull;")))
     (<:div :id :contents
      (case *action*
        ((:index nil)