This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
### Keybase proof | |
I hereby claim: | |
* I am DomKM on github. | |
* I am domkm (https://keybase.io/domkm) on keybase. | |
* I have a public key whose fingerprint is E8A7 7F7C FC53 EE8E 59FA 5468 0A66 DE7B 9E89 228D | |
To claim this, I am signing this object: |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(require '[automat.core :as a]) | |
(-> [1 2 (a/$ :conj) 3 4 (a/$ :conj)] | |
(a/compile {:reducers {:conj conj}}) | |
(a/find nil [1 2 3 4]) | |
:value) | |
;=> (4 2) | |
(-> [1 a/any (a/$ :conj) 3 4 (a/$ :conj)] | |
(a/compile {:reducers {:conj conj}}) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defrecord User [id]) | |
; -------------------- | |
; unmatch on Routes | |
(def routes | |
(silk/routes [[User ["users" (silk/integer :id)]]])) | |
(silk/unmatch routes User (User. 42)) ; you can use a record as a params map |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defn render-str [el] | |
(dom/render-to-str | |
(om/build | |
(fn [data owner] | |
(reify | |
om/IRender | |
(render [_] el))) | |
{}))) | |
(render-str (dom/div nil)) |
NewerOlder