On 25 Jul 2011, at 21:45, Sam Aaron wrote:
> 
> (defn update
>  []
>  (let [changed? (dosync
>                  (let [old-a @a
>                        new-a (ref-set a (new-val))]
>                    (= old-a new-a)))]
>    (when changed? (changed-fn))))

Clearly I meant (not (= old-a new-a)) :-)

Sam

---
http://sam.aaron.name

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to