Switch to renames.
This commit is contained in:
parent
de9e492bdc
commit
94afb7a7a1
|
@ -945,7 +945,7 @@ then to register those handlers with the router.
|
|||
Here's how we would register our event handler:
|
||||
|
||||
```Clojure
|
||||
(register-pure-handler
|
||||
(register-handler
|
||||
:delete-item ;; the event id (name)
|
||||
handle-delete) ;; the handler function for that event
|
||||
```
|
||||
|
|
|
@ -2,7 +2,7 @@
|
|||
(:require
|
||||
[todomvc.db :refer [default-value valid-schema?
|
||||
get-local-storage set-local-storage!]]
|
||||
[re-frame.core :refer [register-pure-handler
|
||||
[re-frame.core :refer [register-handler
|
||||
path after
|
||||
trim-v debug]]))
|
||||
|
||||
|
@ -29,7 +29,7 @@
|
|||
|
||||
;; -- Handlers ----------------------------------------------------------------
|
||||
|
||||
(register-pure-handler ;; disptached to on app startup
|
||||
(register-handler ;; disptached to on app startup
|
||||
:initialise-db ;; event id being handled
|
||||
check-schema ;; middleware
|
||||
(fn [_ _] ;; the handler
|
||||
|
@ -37,7 +37,7 @@
|
|||
(get-local-storage)))) ;; all hail the new state
|
||||
|
||||
|
||||
(register-pure-handler ;; handlers changes the footer filter
|
||||
(register-handler ;; handlers changes the footer filter
|
||||
:set-showing ;; event-id
|
||||
[write-ls check-schema debug trim-v] ;; middleware (wraps the handler)
|
||||
(fn ;; handler
|
||||
|
@ -45,7 +45,7 @@
|
|||
(assoc db :showing filter-kw)))
|
||||
|
||||
|
||||
(register-pure-handler ;; given the text, create a new todo
|
||||
(register-handler ;; given the text, create a new todo
|
||||
:add-todo
|
||||
todo-middleware
|
||||
(fn [todos [text]] ;; "path" middlware means we are given :todo
|
||||
|
@ -53,7 +53,7 @@
|
|||
(assoc todos id {:id id :title text :done false}))))
|
||||
|
||||
|
||||
(register-pure-handler
|
||||
(register-handler
|
||||
:complete-all-toggle
|
||||
todo-middleware
|
||||
(fn [todos]
|
||||
|
@ -63,28 +63,28 @@
|
|||
(keys todos)))))
|
||||
|
||||
|
||||
(register-pure-handler
|
||||
(register-handler
|
||||
:toggle-done
|
||||
todo-middleware
|
||||
(fn [todos [id]]
|
||||
(update-in todos [id :done] not)))
|
||||
|
||||
|
||||
(register-pure-handler
|
||||
(register-handler
|
||||
:save
|
||||
todo-middleware
|
||||
(fn [todos [id title]]
|
||||
(assoc-in todos [id :title] title)))
|
||||
|
||||
|
||||
(register-pure-handler
|
||||
(register-handler
|
||||
:delete-todo
|
||||
todo-middleware
|
||||
(fn [todos [id]]
|
||||
(dissoc todos id)))
|
||||
|
||||
|
||||
(register-pure-handler
|
||||
(register-handler
|
||||
:clear-completed
|
||||
todo-middleware
|
||||
(fn [todos _]
|
||||
|
|
|
@ -97,7 +97,7 @@
|
|||
(defn enrich
|
||||
"Middleware factory which runs a given function \"f\" in the after position.
|
||||
\"f\" is (db) -> db
|
||||
Unlike \"after\" which is about side effects, enrich expects f to process and alter
|
||||
Unlike \"after\" which is about side effects, \"enrich\" expects f to process and alter
|
||||
db in some useful way, contributing to the derived data, flowing vibe.
|
||||
Imagine that todomvc needed to do duplicate detection - if any two todos had
|
||||
the same text, then highlight their background, and report them in a warning
|
||||
|
@ -117,7 +117,7 @@
|
|||
[handler]
|
||||
(fn validate-handler
|
||||
[db v]
|
||||
(f (handler db v)))))
|
||||
(f (handler db v))))) ;; (comp f handler)
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue