notid/integreat
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

minor fixes

Browse Source
This commit is contained in:
Bryce Covert
2020-08-18 12:53:46 -07:00
parent 44dab34240
commit 2716b6e2ba
3 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/cljs/auto_ap/effects.cljs
View File

@@ -25,11 +25,14 @@
(str (.-protocol (.-location js/window)) "//" (.-host (.-location js/window)) (.-pathname (.-location js/window))
"?"
(cemerick.url/map->query (->> uri-params
(filter (fn [[k v]] (not-empty v)) )
(filter (fn [[k v]] (and v
(or (not (seqable? v))
(not-empty v)))) )
(map
(fn [[k v]]
(if (string? v)
[k (str "\"" v "\"")])))
[k (str "\"" v "\"")]
[k v])))
(into {} )))))))
(re-frame/reg-fx