Clojure sequentials & maps into JavaScript arrays and objects

gistfile1.clj

(defn ->js [o]
  (cond
    (keyword? o) (name o)
    (map? o) (let [out (js-obj)]
               (doseq [[k v] o]
                 (aset out (->js k) (->js v)))
               out)
    (coll? o) (apply array (map ->js o))
    :else o))

Working on making this recursive...