clj -e '(let [m (list :a 42) {:keys [a]} m] (prn [a (get m :a)]))'
not always
@slipset FWIW your patch for CLJ-2524 has a typo (fn -> Fn)
thanks, patch removed