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