From d79c7077bf488e0d5c4609fc9d6b31fad7ab2fb9 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Mon, 12 Oct 2009 11:04:47 +0200
Subject: Add a Content-Type meta tag to XHTML pages.

Ignore-this: c52fd0c8dcd106c0c0b485a9b104d67d

darcs-hash:e1acbd0f0f80c817a816883934a6b6b94d60698a
---
 journal.lisp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/journal.lisp b/journal.lisp
index 8b83aea..a78e7a0 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -425,6 +425,13 @@
   (<xhtml :xmlns "http://www.w3.org/1999/xhtml"
           :lang "de"
    (<:head
+    ;; This meta tag is, in fact, a lie, as we are actually
+    ;; application/xhtml+xml, but without it, the encoding can not be
+    ;; derived from the code alone by HTML parsers.  (It can be by XML
+    ;; parses because of the XML preamble.)  This would make saving the
+    ;; page on a disk inconvenient.
+    (<:meta :http-equiv "Content-Type"
+            :content "text/html; charset=UTF-8")
     (<:title
      (<:as-is
       (if page-title
-- 
cgit v1.2.3