From 81803e4fb3efd1fb37d6443f12e8079dadb4f9ff Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Wed, 10 Dec 2008 22:27:49 +0100
Subject: Minor updates and fixes.

darcs-hash:182b7ad2f1c671161b6a2f056ab01f88d414eb99
---
 journal.lisp | 4 +---
 main.lisp    | 1 +
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/journal.lisp b/journal.lisp
index bfd5f76..957a0db 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -44,9 +44,7 @@
         ((:edit :preview) (values "/~D/preview" post-id))
         (:post-comment (values "/~D" post-id))
         (:save (values "/~D/save" post-id))
-        (:css (if (eq *site* :mst-plus)
-                  "/../../journal.css"
-                  "/../journal.css"))))))
+        (:css "/../journal.css")))))
 
 
 (defun show-atom-feed ()
diff --git a/main.lisp b/main.lisp
index fdd6b67..e622f03 100644
--- a/main.lisp
+++ b/main.lisp
@@ -191,6 +191,7 @@
   (dolist (env-var '("HTTP_CACHE_CONTROL" "HTTP_IF_MODIFIED_SINCE"))
     (pushnew env-var http::*http-env-vars*))
   (http:http-init)
+  (setq cffi:*default-foreign-encoding* :iso-8859-15)
   (handler-bind
       ((error #'
         (lambda (e)
-- 
cgit v1.2.3