status-im
/
re-frame
mirror of https://github.com/status-im/re-frame.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Remove unnecessary whitespace from tests

This commit is contained in:
Krisztian Szabo 2015-07-24 15:54:27 +02:00
parent dd0471ee29
commit 44e0b7383c
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
test/re-frame/middleware.cljs
View File

@ -15,19 +15,19 @@
(deftest trim-v (deftest trim-v
(let [handler (fn [db vect] vect)] (let [handler (fn [db vect] vect)]
(is (= (handler nil [:a :b :c]) (is (= (handler nil [:a :b :c])
[:a :b :c])) [:a :b :c]))
(is (= ((middleware/trim-v handler) nil [:a :b :c]) (is (= ((middleware/trim-v handler) nil [:a :b :c])
[:b :c])))) [:b :c]))))
(deftest path (deftest path
(let [db {:a true} (let [db {:a true}
handler (fn handler (fn
[a [_]] [a [_]]
(not a))] (not a))]
(let [new-db (((middleware/path [:a]) (let [new-db (((middleware/path [:a])
handler) db [nil])] handler) db [nil])]
(is (= (:a new-db) (is (= (:a new-db)
false))))) false)))))
@ -38,4 +38,4 @@
(is (= (wrapped {:a 0 :b 2} 0) ;; no change in 'a' (is (= (wrapped {:a 0 :b 2} 0) ;; no change in 'a'
{:a 0 :b 2})) {:a 0 :b 2}))
(is (= (wrapped {:a 4 :b 2} 0) ;; 'a' changed to 0 (is (= (wrapped {:a 4 :b 2} 0) ;; 'a' changed to 0
{:c 2 :a 0 :b 2})))) ;; 'c' is a + b {:c 2 :a 0 :b 2})))) ;; 'c' is a + b