idea for cash flow linkage. makes invoices use uri parameters.
This commit is contained in:
@@ -320,3 +320,10 @@
|
||||
:before (fn [context]
|
||||
(-> context
|
||||
(assoc-in [:coeffects :user] (get-in context [:coeffects :db :user]))))))
|
||||
|
||||
(defn query-params []
|
||||
(reduce-kv
|
||||
(fn [result k v]
|
||||
(assoc result (keyword k) (cljs.tools.reader.edn/read-string v)))
|
||||
{}
|
||||
(:query (cemerick.url/url (.-location js/window)))))
|
||||
|
||||
Reference in New Issue
Block a user