                            (assoc :key (or (:key v) k))
                            (assoc :name (or (:name v) k)))]))
              (into {}))
-
-        (instance?  clojure.lang.Seqable d)
+        (seqable? d)
         (->> d
              (map-indexed (fn [i v] [(or (:key v) (:name v) (str i)) v]))
              (into {}))

    ))


(defn- normalize-to-key-name-map [d]
  (cond (map? d)
        (->> d

      (#(assoc % :context (-> % :context normalize-context)))
      ))

;(apply dissoc {:x 5} [:x])

;### Debug ####################################################################
;(logging-config/set-logger! :level :debug)
