summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2009-10-12 11:04:47 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2009-10-12 11:04:47 +0200
commitd79c7077bf488e0d5c4609fc9d6b31fad7ab2fb9 (patch)
treea007e4ee5ee6a566589b4b53345a7da6e0f5cb62
parent631d51270644310236eb5d26af2a56dce80f9eaf (diff)
Add a Content-Type meta tag to XHTML pages.
Ignore-this: c52fd0c8dcd106c0c0b485a9b104d67d darcs-hash:e1acbd0f0f80c817a816883934a6b6b94d60698a
-rwxr-xr-xjournal.lisp7
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