From d367d36a4a2979f4469de73597910b75050afa13 Mon Sep 17 00:00:00 2001 From: Kenny Liu Date: Sat, 28 Mar 2015 09:17:40 +0700 Subject: [PATCH] Rewrote build-url using ->> macro. --- src/stripe_clojure/core.clj | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/src/stripe_clojure/core.clj b/src/stripe_clojure/core.clj index 328690c..2e3a8d0 100644 --- a/src/stripe_clojure/core.clj +++ b/src/stripe_clojure/core.clj @@ -9,11 +9,12 @@ (def stripe-api-url "https://api.stripe.com/v1/") (defn build-url [[url-ks url-vs] params] - (str stripe-api-url - (apply str - (interpose "/" - (filter (comp not nil?) - (interleave url-ks (map params url-vs))))))) + (->> (map params url-vs) + (interleave url-ks) + (filter (comp not nil?)) + (interpose "/") + (apply str) + (str stripe-api-url))) (defn make-request [params method resource]