On Sat, Mar 30, 2013 at 9:49 PM, larry google groups
<lawrencecloj...@gmail.com> wrote:
> (def initial-data
> :slides {
> :who-is-going-to-summer-camp { :public-text "Who is going to
> summer camp?
>
> :order-of-appearance 1
>
> :to-be-deleted true}
> :what-is-your-budget { :public-text "What is your budget?
> :order-of-appearance 2}
> }
>
> :answers {
> :under-one-thousand-dollars { :public-text "Under $1,000
> dollars?"
> :slides-id
> :what-is-your-budget }
> :over-one-thousand-dollars { :public-text "Over $1,000
> dollars?"
> :slides-id
> :what-is-your-budget }
> }
>
> ;; etc
> )
>
> (defn delete-those-items-in-the-model-that-are-scheduled-to-be-deleted []
> ;; 2013-02-28 - THIS FUNCTION IS CALLED AT STARTUP AND RUNS IN ITS OWN
> THREAD, REPEATING ENDLESSLY.
> (doseq [x (keys (@um/interactions))]
> (doseq [m (vals (um/get-from-model [x]))]
> (if (:to-be-deleted m)
> (do
> (um/delete-this-item m)
> (monger/remove-this-item m)))))
> (. java.lang.Thread sleep 900000)
> (delete-those-items-in-the-model-that-are-scheduled-to-be-deleted))
>
> Assume um/get-from-model is almost the same as get-in. Assume initial-data is
> stored in the atom um/interactions. Where am I calling a map as a function
> here?
(@um/interactions) perhaps?
Lars Nilsson
--
--
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
---
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
