summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-05-29 22:42:59 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-05-29 22:42:59 +0200
commiteaf7dd111d22b04e581b39aa58706ab43fe57772 (patch)
treec73a616c44dcfca56739a13ea768bb3bc06546a2
parent44ac478eff87b22cf1c3fb53d4c3a23f79cf73c4 (diff)
Subtitle cosmetics.
darcs-hash:ff7f2de80b5dbb07f847bc15a347ae0220406487
-rwxr-xr-xjournal.lisp15
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)