Convert leiningen style deps vector into deps.edn map

scratch.clj

(defn lein-deps->deps-map [deps-vector]
  (reduce merge {}
    (for [d    deps-vector
          :let [[prj mvn-version & _] d]]
      {prj {:mvn/version mvn-version}})))


(def d '[[org.clojure/clojure              "1.9.0-alpha13"]
         [org.clojure/core.async           "0.2.391"]
         [io.pedestal/pedestal.interceptor "0.5.1"]
         [io.pedestal/pedestal.route       "0.5.1"]
         [io.pedestal/pedestal.service     "0.5.1"]
         [cheshire                         "5.5.0" :exclusions [[com.fasterxml.jackson.core/jackson-core]]]
         [com.cognitect/transit-clj        "0.8.285"]
         [commons-codec                    "1.10"]
         [org.apache.kafka/kafka_2.11      "0.10.1.0"]
         [org.apache.zookeeper/zookeeper   "3.4.9"]])

(set! *print-namespace-maps* false)
(pprint (lein-deps->deps-map d))