¿Cómo actualizar los registros en un mapa de ref en Clojure?

Question

Teniendo en cuenta la situación siguiente:

(defrecord Person [firstname lastname]) 
(def some-map (ref {})) 

(dosync 
    (alter some-map conj {1 (Person. "john" "doe")}) 
    (alter some-map conj {2 (Person. "jane" "jameson")})) 

Para cambiar el apellido de "Joe" a "nick", hago lo siguiente:

(dosync 
    (alter some-map (fn [m]     
        (assoc m 1 
         (assoc (m 1) :firstname "nick"))))) 

Cuál es la forma idiomática de hacer esto en Clojure?

Answer 1

No es necesario utilizar la actualización, para este caso, assoc-in es exactamente lo que desea.

(dosync (alter some-map assoc-in [1 :firstname] "nick"))

Answer 2

Editar: Para su ejemplo assoc-in es mejor, ya que ignora el valor anterior. Mantener esta respuesta para los casos en que realmente necesita el valor anterior:

El update-in está ahí para actualizar las estructuras anidadas:

(alter some-map update-in [1 :firstname] (constantly "nick")) 

El último argumento es una función del valor de ser "sustituido" (como assoc , no reemplaza sino que devuelve una nueva estructura.) En este caso, se ignora el valor anterior, de ahí la función constantly que siempre devuelve "nick".