fix rss route throwing an error

This commit is contained in:
Gered 2014-03-23 17:02:28 -04:00
parent d8a2479841
commit 3eb031b94e

View file

@ -2,7 +2,7 @@
(:use [blarg.routes.helpers]
[compojure.core])
(:require [markdown.core :as md]
[noir.response :as resp]
[noir.response :refer [xml]]
[clj-rss.core :as rss]
[clj-time.core]
[clj-time.coerce]
@ -16,7 +16,7 @@
(let [channel {:title rss-title
:link rss-site-url
:description rss-description}]
(resp/content-type "text/xml"
(xml
(apply
(partial rss/channel-xml channel)
(->> (posts/list-posts false 10)