 (defn jar-names
   "Construct a few possible name variations a jar might have."
   [jarmap]
-  [ (str (:name jarmap) "-" (:version jarmap) ".jar")
-    (str (:name jarmap) ".jar")])
+  [(str (:name jarmap) "-" (:version jarmap) ".jar")
+   (str (:name jarmap) ".jar")])
 
 (defn finish-deploy [#^NGContext ctx, files]
   (let [account (first (.getArgs ctx))

(def *max-line-size* 4096)
(def *max-file-size* 20485760)
(def *allowed-suffixes* #{"pom" "xml" "jar" "sha1" "md5"})

(set! *warn-on-reflection* true)

(defn safe-read-line
  ([#^InputStream stream #^StringBuilder builder]

        (do
          (.println *err* (str "\nDeploying " (:group jarmap) "/"
                               (:name jarmap) " " (:version jarmap)))
          (db/add-jar account jarmap true)
          (maven/deploy-model jarfile model
                              (str "file://" (:repo config)))
          (db/add-jar account jarmap))
        (throw (Exception. (str "You need to give me one of: " names)))))
    (.println *err* (str "\nSuccess! Your jars are now available from "
                         "http://clojars.org/"))
