3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-07 07:41:39 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix many warnings.

Browse source
This commit is contained in:
Andrey Antukh 2020-08-05 15:17:22 +02:00
parent 9b4cc30d3f
commit 313723cfe1
4 changed files with 26 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

16
frontend/src/uxbox/util/router.cljs
View file

@ -53,8 +53,8 @@
qdt (.createFromMap QueryData (-> qparams
(d/remove-nil-vals)
(clj->js)))]
(.setQueryData uri qdt)
(.toString uri))))))
(.setQueryData ^js uri qdt)
(.toString ^js uri))))))
(defn create
[routes]
@ -70,7 +70,7 @@
(defn query-params
"Given goog.Uri, read query parameters into Clojure map."
[^goog.Uri uri]
(let [q (.getQueryData uri)]
(let [^js q (.getQueryData uri)]
(->> q
(.getKeys)
(map (juxt keyword #(.get q %)))
@ -80,9 +80,9 @@
"Given routing tree and current path, return match with possibly
coerced parameters. Return nil if no match found."
[router path]
(let [uri (.parse Uri path)]
(when-let [match (r/match-by-path router (.getPath uri))]
(let [qparams (parse-query-data (.getQueryData uri))
(let [uri (.parse ^js Uri path)]
(when-let [match (r/match-by-path router (.getPath ^js uri))]
(let [qparams (parse-query-data (.getQueryData ^js uri))
params {:path (:path-params match) :query qparams}]
(assoc match
:params params
@ -128,9 +128,9 @@
(let [stoper (rx/filter (ptk/type? ::initialize-history) stream)
history (:history state)
router (:router state)]
(ts/schedule #(on-change router (.getToken history)))
(ts/schedule #(on-change router (.getToken ^js history)))
(->> (rx/create (fn [sink]
(let [key (e/listen history "navigate" #(sink (.-token %)))]
(let [key (e/listen history "navigate" (fn [o] (sink (.-token ^js o))))]
(fn []
(bhistory/disable! history)
(e/unlistenByKey key)))))