assoc-ex.clj

(def
 ^{:arglists '([map key val] [map key1 val1 key2 val2] [map key val & kvs])
   :doc "assoc[iate]. When applied to a map, returns a new map of the
    same (hashed/sorted) type, that contains the mapping of key(s) to
    val(s). When applied to a vector, returns a new vector that
    contains val at index. Note - index must be <= (count vector)."
   :added "1.0"
   :static true}
 assoc
 (fn ^:static assoc
   ([map key val] (clojure.lang.RT/assoc map key val))
   ([map key1 val1 key2 val2] (clojure.lang.RT/assoc (clojure.lang.RT/assoc map key1 val1) key2 val2))
   ([map key1 val2 key2 val2 & kvs]
    (let [ret (clojure.lang.RT/assoc (clojure.lang.RT/assoc map key1 val1) key2 val2))]
      (if kvs
        (if (next kvs)
          (recur ret (first kvs) (second kvs) (nnext kvs))
          (throw (IllegalArgumentException.
                  "assoc expects even number of arguments after map/vector, found odd number")))
        ret)))))

I fixed the order of the assocs between k1/v1, k2,v2. I believe it should assoc k1 first, then k2