Bug fix for undo.cljs

This commit is contained in:
Stuart Mitchell 2016-06-22 13:34:25 +12:00
parent 9452998e0b
commit addc55658e
1 changed files with 1 additions and 20 deletions

View File

@ -227,24 +227,5 @@
(fn fsm-handler (fn fsm-handler
[db event-v] [db event-v]
(let [new-db (handler db event-v)] (let [new-db (handler db event-v)]
(update-fn new-db event-v trigger fsm-path)))) ;; think about access to event-v (update-fn new-db event-v trigger fsm-path))))) ;; think about access to event-v
(register-handler
:database-connection
(fsm-tirgger :db-working bootstrap-fsm [:fsms :bnootstrap] )
(fn [db q]
.....)
)
;; state
;; fms-state
;; seen-evetns
;; started-tasks
(defn bootstrap-fsm
[new-db event-v trigger fsm-path]
(let [new-state ]
)
)