From ee4b13e5dd53dd0886aacac3d6ec969b99db5524 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Thu, 20 Sep 2007 14:10:16 +0200
Subject: Indicate the site language both in the HTTP headers and HTML code.

darcs-hash:2f851251a0fda4418c462d0cc663ea82c3f07bde
---
 journal.lisp | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'journal.lisp')

diff --git a/journal.lisp b/journal.lisp
index 60bc06c..47ad91c 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -48,6 +48,7 @@
 
 (defun show-atom-feed ()
   (http-add-header "Last-Modified" (http-timestamp (compute-journal-last-modified-date)))
+  (http-add-header "Content-Language" "de")
   (http-send-headers "application/atom+xml; charset=UTF-8")
 
   (flet ((atom-time (time)
@@ -237,9 +238,11 @@
   ;;       feel slower to the end user rather than faster.
   ;;
   ;; (http-add-header "Last-Modified" (http-timestamp (compute-journal-last-modified-date)))
+  (http-add-header "Content-Language" "de")
   (http-send-headers "text/html; charset=UTF-8")
 
   (<xhtml :xmlns "http://www.w3.org/1999/xhtml"
+          :lang "de"
    (<:head
     (<:title
      (<:as-html
-- 
cgit v1.2.3