luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2026-02-14 15:25:16 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Test rfe start!

Browse source
This commit is contained in:
Juho Teperi 2020-09-23 14:08:30 +03:00
parent 5651b4648a
commit 58f9871747
1 changed files with 24 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
test/cljs/reitit/frontend/easy_test.cljs
View file

@ -12,6 +12,8 @@
["foo" ::foo] ["foo" ::foo]
["bar/:id" ::bar]])) ["bar/:id" ::bar]]))
;; TODO: Only tests fragment history, also test HTML5?
(deftest easy-history-routing-test (deftest easy-history-routing-test
(when browser (when browser
(gevents/removeAll js/window goog.events.EventType.POPSTATE) (gevents/removeAll js/window goog.events.EventType.POPSTATE)
@ -24,7 +26,8 @@
(fn on-navigate [match history] (fn on-navigate [match history]
(let [url (rfh/-get-path history)] (let [url (rfh/-get-path history)]
(case (swap! n inc) (case (swap! n inc)
1 (do (is (= "/" url) 1 (do (is (some? (:popstate-listener history)))
(is (= "/" url)
"start at root") "start at root")
(rfe/push-state ::foo)) (rfe/push-state ::foo))
2 (do (is (= "/foo" url) 2 (do (is (= "/foo" url)
@ -41,7 +44,24 @@
(.back js/window.history)) (.back js/window.history))
6 (do (is (= "/" url) 6 (do (is (= "/" url)
"go back after replace state") "go back after replace state")
(rfh/stop! @rfe/history)
(done)) ;; Reset to ensure old event listeners aren't called
(is false "extra event")))) (rfe/start! router
(fn on-navigate [match history]
(let [url (rfh/-get-path history)]
(case (swap! n inc)
7 (do (is (= "/" url)
"start at root")
(rfe/push-state ::foo))
8 (do (is (= "/foo" url)
"push-state")
(rfh/stop! @rfe/history)
(done))
(do
(is false (str "extra event 2" {:n @n, :url url}))
(done)))))
{:use-fragment true}))
(do
(is false (str "extra event 1" {:n @n, :url url}))
(done)))))
{:use-fragment true}))))) {:use-fragment true})))))