From b8b25a522ff1a05c9b8d64b2e875eb8a04967b40 Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Mon, 27 Feb 2012 23:38:58 +0100 Subject: Book Marx: Serve Atom feed UTF-8-encoded. --- src/mulk/benki/book_marx.clj | 2 +- src/mulk/benki/main.clj | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/mulk/benki/book_marx.clj b/src/mulk/benki/book_marx.clj index 0c02a02..9eabfc1 100644 --- a/src/mulk/benki/book_marx.clj +++ b/src/mulk/benki/book_marx.clj @@ -122,7 +122,7 @@ (defpage "/marx/feed" {} (let [user (session/get :user)] - (response/content-type "application/atom+xml" + (response/content-type "application/atom+xml; charset=UTF-8" (marx-feed-for-user user)))) (defpage "/marx/tags" {} diff --git a/src/mulk/benki/main.clj b/src/mulk/benki/main.clj index 5367068..169b60b 100644 --- a/src/mulk/benki/main.clj +++ b/src/mulk/benki/main.clj @@ -16,7 +16,7 @@ ctype (get-in response [:headers "Content-Type"]) utf8ctype (str ctype "; charset=utf-8")] (if (and ctype - (re-matches #"^(text/html|text/plain|application/xhtml+xml|text/xml)$" ctype)) + (re-matches #"^(text/html|text/plain|application/xhtml+xml|text/xml|application/atom+xml)$" ctype)) (assoc-in response [:headers "Content-Type"] utf8ctype) response)))) -- cgit v1.2.3