|
1 | 1 | (ns todomvc.client-services
|
2 | 2 | (:require [todomvc.transact :as t]
|
3 |
| - [datascript :as d] |
4 |
| - [cljs.core.async :refer [<! >! put! chan timeout]]) |
5 |
| - (:require-macros [cljs.core.async.macros :refer [go]])) |
| 3 | + [datascript :as d])) |
6 | 4 |
|
7 | 5 | (defmulti handle
|
8 | 6 | (fn [event args db conn local-conn] event))
|
|
13 | 11 | :text text
|
14 | 12 | :completed false}])
|
15 | 13 | id (get (:tempids tx) -1)]
|
16 |
| - (go (<! (timeout 1000)) |
17 |
| - (d/transact! conn [[:db.fn/call t/commit-item temp-id id]])))) |
| 14 | + (d/transact! conn [[:db.fn/call t/commit-item temp-id id]]))) |
18 | 15 |
|
19 | 16 | (defmethod handle :complete-edit
|
20 | 17 | [event [id text] db conn local-conn]
|
21 | 18 | (d/transact! local-conn [[:db/add id :text text]])
|
22 |
| - (go (<! (timeout 1000)) |
23 |
| - (d/transact! conn [[:db.fn/call t/commit-edit id]]))) |
| 19 | + (d/transact! conn [[:db.fn/call t/commit-edit id]])) |
24 | 20 |
|
25 | 21 | (defmethod handle :toggle-item
|
26 | 22 | [event [id completed] db conn local-conn]
|
27 |
| - (go (<! (timeout 1000)) |
28 |
| - (d/transact! local-conn [[:db/add id :completed completed]]))) |
| 23 | + (d/transact! local-conn [[:db/add id :completed completed]])) |
29 | 24 |
|
30 | 25 | (defmethod handle :remove-item
|
31 | 26 | [event [id] db conn local-conn]
|
32 |
| - (go (<! (timeout 1000)) |
33 |
| - (d/transact! local-conn [[:db.fn/retractEntity id]]))) |
| 27 | + (d/transact! local-conn [[:db.fn/retractEntity id]])) |
34 | 28 |
|
35 | 29 | (defmethod handle :clear-completed
|
36 | 30 | [event [ids] db conn local-conn]
|
37 | 31 | ;; todo make batch delete enpoint and use that
|
38 |
| - (go (<! (timeout 1000)) |
39 |
| - (d/transact! local-conn (for [id ids] |
40 |
| - [:db.fn/retractEntity id])))) |
| 32 | + (d/transact! local-conn (for [id ids] |
| 33 | + [:db.fn/retractEntity id]))) |
41 | 34 |
|
42 | 35 | (defmethod handle :toggle-all
|
43 | 36 | [event _ db conn local-conn]
|
|
0 commit comments