From eaf7dd111d22b04e581b39aa58706ab43fe57772 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Tue, 29 May 2007 22:42:59 +0200
Subject: Subtitle cosmetics.

darcs-hash:ff7f2de80b5dbb07f847bc15a347ae0220406487
---
 journal.lisp | 15 ++++++++-------
 1 file 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)
-- 
cgit v1.2.3