Skip to content

Commit

Permalink
ensure macros are keyed correctly
Browse files Browse the repository at this point in the history
  • Loading branch information
mitchdzugan committed May 14, 2020
1 parent 119a731 commit 5ea1aa8
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 6 deletions.
2 changes: 1 addition & 1 deletion project.clj
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
(defproject mayu "0.1.38"
(defproject mayu "0.1.39"
:description "FIXME: write description"
:url "http://example.com/FIXME"
:license {:name "Eclipse Public License"
Expand Down
10 changes: 5 additions & 5 deletions src/cljc/mayu/macros.cljc
Original file line number Diff line number Diff line change
Expand Up @@ -57,9 +57,9 @@
(dom/step ::if-else (ui ~@(drop 1 (nth args 4)))))
'when `(if ~(nth args 0)
(dom/step ::when (ui ~@(drop 1 args)))
(w/pure nil))
(dom/step ::when (w/pure nil)))
'when-not `(if ~(nth args 0)
(w/pure nil)
(dom/step ::when-not (w/pure nil))
(dom/step ::when-not (ui ~@(drop 1 args))))
'case `(case ~(nth args 0)
~@(mapcat (fn [clause id]
Expand Down Expand Up @@ -90,9 +90,9 @@
[matcher body]))
(filter vector? args)
(range)))
'for `(w/mapm (fn ~(nth args 2)
(ui ~@(drop 4 args)))
~(nth args 0))
'for `(dom/step ::for (w/mapm (fn ~(nth args 2)
(ui ~@(drop 4 args)))
~(nth args 0)))
'apply `(<#> (ui ~@(drop 1 args))
~(nth args 0))
'ssr-await `(dom/ssr-await ~(nth args 0)
Expand Down

0 comments on commit 5ea1aa8

Please sign in to comment.