     (println "\n\n")))
 
 (defn clojars-versions [library-name]
-  (let [response (http-get-text-seq *clojars-all-jars-url*)]
+  (let [response (http-get-text-seq clojars-all-jars-url)]
     (println "\n\nAvailable versions for library: " library-name)
     (println "--------------------------------------------------------------------------------")
     (doseq [entry (filter #(= (first %) (symbol library-name))


(defn get-pom-locations
  ([library-name version]
     (let [response (http-get-text-seq *clojars-all-poms-url*)
	   pom-dir (get-pom-dir library-name version)]
       (for [line response :when (.startsWith line pom-dir)]
	 line))))

            [clojure.java.io :as io])
  (:use cake cake.core))

(def clojars-repo-url "http://clojars.org/repo")
(def clojars-all-jars-url (str clojars-repo-url "/all-jars.clj"))
(def clojars-all-poms-url (str clojars-repo-url "/all-poms.txt"))

(defn http-get-text-seq [url] (line-seq (io/reader url)))

(defn get-latest-version [library-name]
  (let [response (http-get-text-seq clojars-all-jars-url)
	lib-name (symbol library-name)]
    (second (last (filter #(= (first %) lib-name)
			  (for [line response]
