abhin4v
/
clj-lastfm
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove reflection warnings

master
Abhinav Sarkar 2010-07-24 16:43:38 +05:30
parent a3aa43060e
commit 3fd30971e5
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/clj_lastfm/core.clj
View File

@ -38,11 +38,11 @@
(defn- struct? [obj] (instance? clojure.lang.PersistentStructMap obj)) (defn- struct? [obj] (instance? clojure.lang.PersistentStructMap obj))
(def #^{:private true} sdftz (def #^{:private true :tag SimpleDateFormat} sdftz
(doto (SimpleDateFormat. "EEE, dd MMMM yyyy HH:mm:ss +0000") (doto (SimpleDateFormat. "EEE, dd MMMM yyyy HH:mm:ss +0000")
(.setTimeZone (TimeZone/getTimeZone "GMT")))) (.setTimeZone (TimeZone/getTimeZone "GMT"))))
(def #^{:private true} sdf (def #^{:private true :tag SimpleDateFormat} sdf
(doto (SimpleDateFormat. "EEE, dd MMMM yyyy HH:mm:ss") (doto (SimpleDateFormat. "EEE, dd MMMM yyyy HH:mm:ss")
(.setTimeZone (TimeZone/getTimeZone "GMT")))) (.setTimeZone (TimeZone/getTimeZone "GMT"))))
@ -65,7 +65,7 @@
(defn- create-url [query-params] (defn- create-url [query-params]
(.toURL (.toURL
(apply (#^URI apply
#(URI. %1 %2 %3 %4 %5) #(URI. %1 %2 %3 %4 %5)
(conj (conj
api-root-url api-root-url
@ -87,7 +87,7 @@
data (-> url get-url read-json keywordize-keys)] data (-> url get-url read-json keywordize-keys)]
(if (-> data :error nil?) (if (-> data :error nil?)
data data
(throw (IllegalArgumentException. (data :message)))))) (throw (IllegalArgumentException. (-> data :message str))))))
(defn- create-get-obj-fn [fixed-params parse-fn] (defn- create-get-obj-fn [fixed-params parse-fn]
(fn [more-params] (fn [more-params]