Added a slash-joins function.

Raynes · Jun 10, 2010 · 0d8d9ec · 0d8d9ec
1 parent 549b587
commit 0d8d9ec
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/src/clj_github/core.clj b/src/clj_github/core.clj
@@ -1,5 +1,5 @@
 (ns clj-github.core
-  (:use [clojure.contrib.base64 :only [encode-str]]
+  (:use [clojure.contrib [string :only [join]] [base64 :only [encode-str]]]
 	[clojure-http.client :only [request add-query-params]]
 	[org.danlarkin.json :only [decode-from-str]])
   (:import java.net.URI))
@@ -29,5 +29,12 @@
   ([data sifter] (if-let [result (:error data)] result (sifter data)))
   ([data] (handle data identity)))
 
+(defn slash-join
+  "Returns a string of it's arguments separated by forward slashes."
+  [& args]
+  (join "/" args))
+
+(defn join-up)
+
 (defmacro with-auth [auth body]
   `(binding [*authentication* ~auth] ~body))