Skip to content

Commit

Permalink
keep fetcher in sync with the new gavagai translate call
Browse files Browse the repository at this point in the history
  • Loading branch information
ngrunwald committed Aug 16, 2012
1 parent 56b5231 commit 5c4ebfb
Show file tree
Hide file tree
Showing 2 changed files with 8 additions and 6 deletions.
10 changes: 5 additions & 5 deletions src/clj_rome/fetcher.clj
Original file line number Diff line number Diff line change
Expand Up @@ -3,8 +3,9 @@
LinkedHashMapFeedInfoCache HashMapFeedInfoCache)
(com.sun.syndication.fetcher FetcherListener)
(java.net URL))
(:use [clojure.java.io :as io]
[gavagai.core :as gav]))
(:require [clojure.java.io :as io]
[gavagai.core :as gav]
[clj-rome.reader :as r]))

(def ^{:dynamic true} *fetcher*)

Expand Down Expand Up @@ -34,10 +35,9 @@
(HttpURLFeedFetcher. (apply build-feed-cache args))))

(defn retrieve-feed
"retrieves a feed from a fetcher or the default one.
Returns a SyndFeedImpl object"
"retrieves a feed from a fetcher or the default one."
([fetcher url]
(gav/translate (.retrieveFeed fetcher (URL. (str url)))))
(gav/translate (.retrieveFeed fetcher (URL. (str url))) {:nspace r/local-ns}))
([url]
(retrieve-feed *fetcher* url)))

Expand Down
4 changes: 3 additions & 1 deletion src/clj_rome/reader.clj
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,8 @@
(:require [clojure.string :as str]
[gavagai.core :as gav]))

(def local-ns (find-ns 'clj-rome.reader))

(defprotocol Feedable
(make-reader [arg]))

Expand Down Expand Up @@ -46,4 +48,4 @@
(let
[reader (make-reader arg)
feed (.build (SyndFeedInput.) reader)]
(gav/translate feed {:nspace (find-ns 'clj-rome.reader)})))
(gav/translate feed {:nspace local-ns})))

0 comments on commit 5c4ebfb

Please sign in to comment.