clojure.zip/insert-left

function

since v0.0-927

clojure.zip/insert-left

Edit

---

Source docstring:

Inserts the item as the left sibling of the node at this loc,
without moving

(defn insert-left
  [loc item]
    (let [[node {l :l :as path}] loc]
      (if (nil? path)
        (throw "Insert at top")
        (with-meta [node (assoc path :l (conj l item) :changed? true)] (meta loc)))))

---