Add a Content-Type meta tag to XHTML pages.

Ignore-this: c52fd0c8dcd106c0c0b485a9b104d67d

darcs-hash:e1acbd0f0f80c817a816883934a6b6b94d60698a

1 files changed, 7 insertions, 0 deletions

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