0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-10 09:08:31 -05:00

Disable naming of render functions in defc and defcs macros.

This has caused some unexpected behavior with recursive
components.
This commit is contained in:
Andrey Antukh 2016-12-28 15:33:11 +01:00
parent f82c534df4
commit 447d484f7b
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95

View file

@ -36,8 +36,8 @@
4 (let [sym (:name r) 4 (let [sym (:name r)
args (:args r) args (:args r)
func (if (map? v) func (if (map? v)
`(fn ~sym ~args ~v ~(s/compile-html `(do ~@n))) `(fn ~args ~v ~(s/compile-html `(do ~@n)))
`(fn ~sym ~args ~(s/compile-html `(do ~@(cons v n)))))] `(fn ~args ~(s/compile-html `(do ~@(cons v n)))))]
[func (:doc r) (:mixins r) sym])))) [func (:doc r) (:mixins r) sym]))))
(defmacro defc (defmacro defc