moved examples to 0.1.8

examples/simple/project.clj

@@ -3,7 +3,7 @@
   :dependencies [[org.clojure/clojure "1.6.0"]
                  [org.clojure/clojurescript "0.0-2816"]
                  [reagent "0.5.0-alpha3"]
-                 [re-frame "0.1.7"]
+                 [re-frame "0.1.8"]
                  [figwheel "0.2.3-SNAPSHOT"]]
 
   :plugins [[lein-cljsbuild "1.0.4"]

examples/simple/src/simpleexample/core.cljs

@@ -4,7 +4,7 @@
             [re-frame.core :refer [register-handler 
                                    register-pure-handler
                                    pure
-                                   register-subs 
+                                   register-sub 
                                    dispatch 
                                    subscribe]]))
 
@@ -57,14 +57,14 @@
     (swap! db assoc :timer value)))
 
 ;; add subscriptions to :timer and :time-color
-(register-subs
+(register-sub
   :timer
   (fn 
     [db _]
     ;; you need to wrap your subscription code in a reaction
     (reaction (:timer @db))))
 
-(register-subs
+(register-sub
   :time-color
   (fn 
     [db _]

examples/todomvc/project.clj

@@ -3,7 +3,7 @@
                  [org.clojure/clojurescript "0.0-2816"]
                  [reagent "0.5.0-alpha3"]
                  [figwheel "0.2.3-SNAPSHOT"]
-                 [re-frame "0.1.7"]]
+                 [re-frame "0.1.8"]]
 
   :plugins [[lein-cljsbuild "1.0.4"]
             [lein-figwheel "0.2.3-SNAPSHOT"]]

examples/todomvc/src/todomvc/core.cljs

@@ -2,9 +2,10 @@
   (:require-macros [reagent.ratom :refer [reaction]])  
   (:require [reagent.core :as reagent :refer [atom]]
             [re-frame.core :refer [register-pure-handler
-                                   register-subs
+                                   register-sub
                                    subscribe
-                                   dispatch]]))
+                                   dispatch
+                                   path]]))
 
 (defonce initial-db 
   {:todos (sorted-map)
@@ -37,60 +38,58 @@
 
 (register-pure-handler
   :complete-all
+  (path [:todos]) 
   (fn
-    [db [_ v]]
-    (let [todos (:todos db)
-          removed-todos (mmap todos map #(assoc-in % [1 :done] v))]
-      (assoc db :todos removed-todos))))
+    [todos [_ v]]
+    (mmap todos map #(assoc-in % [1 :done] v))))
 
 (register-pure-handler
   :toggle
+  (path [:todos])
   (fn
-    [db [_ id]]
-    (let [todos (:todos db)]
-      (assoc db :todos (update-in todos [id :done] not)))))
+    [todos [_ id]]
+    (update-in todos [id :done] not)))
 
 (register-pure-handler
   :save
+  (path [:todos])
   (fn
-    [db [_ id title]]
-    (let [todos (:todos db)]
-      (assoc db :todos (assoc-in todos [id :title] title)))))
+    [todos [_ id title]]
+    (assoc-in todos [id :title] title)))
 
 (register-pure-handler
   :delete
+  (path [:todos])
   (fn
-    [db [_ id]]
-    (let [todos (:todos db)]
-      (assoc db :todos (dissoc todos id)))))
+    [todos [_ id]]
+    (dissoc todos id)))
 
 (register-pure-handler
   :clear-done
+  (path [:todos])
   (fn
-    [db [_ v]]
-    (let [todos (:todos db)
-          done-todos (mmap todos remove #(get-in % [1 :done]))]
-      (assoc db :todos done-todos))))
+    [todos [_ v]]
+    (mmap todos remove #(get-in % [1 :done]))))
 
-(register-subs
+(register-sub
   :counter
   (fn 
     [db _]
     (reaction (:counter @db))))
 
-(register-subs
+(register-sub
   :todos
   (fn 
     [db _]
     (reaction (:todos @db))))
 
-(register-subs
+(register-sub
   :items
   (fn 
     [db _]
     (reaction (vals (:todos @db)))))
 
-(register-subs
+(register-sub
   :done
   (fn 
     [db _]
@@ -98,7 +97,7 @@
                    (filter :done) 
                    count))))
 
-(register-subs
+(register-sub
   :active
   (fn 
     [db _]

src/re_frame/core.cljs

@@ -11,7 +11,7 @@
 (def dispatch         handlers/dispatch)
 (def dispatch-sync    handlers/dispatch-sync)
 
-(def register-sub subs/register)
+(def register-sub  subs/register)
 (def subscribe     subs/subscribe)
 
 
@@ -32,4 +32,4 @@
   ([id handler]
     (register-handler id pure handler))
   ([id middleware handler]
-    (register-handler id (comp middleware pure) handler)))
+    (register-handler id (comp pure middleware) handler)))