diff options
| -rwxr-xr-x | journal.lisp | 15 | 
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ärsozialistischen Geeks") -                                   ("NEU!  Jetzt ohne regelmäßige -                                     Serverabstürze!") -                                   ("NEU!  Jetzt mit mehr als 3 % Uptime!")))))) +     (<:div :id :main-subtitle +      (<:as-is "••• ") +      (<:as-is +       (random-elt +        '("Geschwafel eines libertärsozialistischen Geeks" +          "NEU!  Jetzt ohne regelmäßige Serverabstürze!" +          "NEU!  Jetzt mit mehr als 3 % Uptime!"))) +      (<:as-is " •••")))      (<:div :id :contents       (case *action*         ((:index nil) | 
