fix typo and tests

Author: Frozenlock

src/reagent/cursor.cljs

@@ -106,4 +106,4 @@
 
   Behaves like a normal atom for the value at the specified path."
   [a path]
-  (cursor path ))
+  (cursor path a))

test/cursor_impl.cljs

@@ -12,21 +12,24 @@
         test-cursor (c/cur test-atom [:a :b :c :d])
         test-cursor2 (c/cur test-atom [])] ;; nasty edge case
 
+    (is (= cljs.core/Atom (type test-cursor2)))
+    
     ;; get the initial values
     (is (= (get-in @test-atom [:a :b :c :d])
            @test-cursor))
 
-    (is (= get-in @test-atom []
+    (is (= (get-in @test-atom [])
            @test-cursor2))
 
     ;; now we update the cursor with a reset    
     (reset! test-cursor 2)
     (is (= @test-cursor 2))
-    (is (= (get-in @test-atom [:a :b :c :d]) 2))
-
-    (reset! test-cursor2 2)
-    (is (= @test-cursor2 2))
-    (is (= (get-in @test-atom []) 2))
+    (is (= (get-in @test-atom [:a :b :c :d]) 2))    
+   
+    (reset! test-cursor2 3)
+    (is (= @test-cursor2 3))
+    (is (= @test-atom 3))
+    (reset! test-atom {:a {:b {:c {:d 1}}}}) ;; restore test-atom
 
     ;; swap
     (reset! test-cursor {}) ;; empty map