mirror of
https://github.com/penpot/penpot.git
synced 2025-08-01 00:48:38 +02:00
✨ Add more config to condo
This commit is contained in:
parent
4d54d5c455
commit
538b8313ed
2 changed files with 17 additions and 2 deletions
|
@ -4,7 +4,6 @@
|
||||||
promesa.core/-> clojure.core/->
|
promesa.core/-> clojure.core/->
|
||||||
promesa.exec.csp/go-loop clojure.core/loop
|
promesa.exec.csp/go-loop clojure.core/loop
|
||||||
rumext.v2/defc clojure.core/defn
|
rumext.v2/defc clojure.core/defn
|
||||||
rumext.v2/fnc clojure.core/fn
|
|
||||||
promesa.util/with-open clojure.core/with-open
|
promesa.util/with-open clojure.core/with-open
|
||||||
app.common.data/export clojure.core/def
|
app.common.data/export clojure.core/def
|
||||||
app.common.data.macros/get-in clojure.core/get-in
|
app.common.data.macros/get-in clojure.core/get-in
|
||||||
|
@ -15,11 +14,13 @@
|
||||||
:hooks
|
:hooks
|
||||||
{:analyze-call
|
{:analyze-call
|
||||||
{app.common.data.macros/export hooks.export/export
|
{app.common.data.macros/export hooks.export/export
|
||||||
potok.v2.core/reify hooks.export/potok-reify
|
|
||||||
app.util.services/defmethod hooks.export/service-defmethod
|
app.util.services/defmethod hooks.export/service-defmethod
|
||||||
app.common.record/defrecord hooks.export/penpot-defrecord
|
app.common.record/defrecord hooks.export/penpot-defrecord
|
||||||
app.db/with-atomic hooks.export/penpot-with-atomic
|
app.db/with-atomic hooks.export/penpot-with-atomic
|
||||||
|
potok.v2.core/reify hooks.export/potok-reify
|
||||||
rumext.v2/fnc hooks.export/rumext-fnc
|
rumext.v2/fnc hooks.export/rumext-fnc
|
||||||
|
rumext.v2/lazy-component hooks.export/rumext-lazycomponent
|
||||||
|
shadow.lazy/loadable hooks.export/rumext-lazycomponent
|
||||||
}}
|
}}
|
||||||
|
|
||||||
:output
|
:output
|
||||||
|
|
|
@ -37,6 +37,9 @@
|
||||||
(api/token-node rsym)
|
(api/token-node rsym)
|
||||||
(api/vector-node [])]
|
(api/vector-node [])]
|
||||||
other))]
|
other))]
|
||||||
|
|
||||||
|
;; (prn (api/sexpr result))
|
||||||
|
|
||||||
{:node result})))
|
{:node result})))
|
||||||
|
|
||||||
(defn penpot-with-atomic
|
(defn penpot-with-atomic
|
||||||
|
@ -71,6 +74,17 @@
|
||||||
{:node result})))
|
{:node result})))
|
||||||
|
|
||||||
|
|
||||||
|
(defn rumext-lazycomponent
|
||||||
|
[{:keys [node]}]
|
||||||
|
(let [[cname mdata params & body] (rest (:children node))
|
||||||
|
[params body] (if (api/vector-node? mdata)
|
||||||
|
[mdata (cons params body)]
|
||||||
|
[params body])]
|
||||||
|
(let [result (api/list-node [(api/token-node 'constantly) nil])]
|
||||||
|
;; (prn (api/sexpr result))
|
||||||
|
{:node result})))
|
||||||
|
|
||||||
|
|
||||||
(defn penpot-defrecord
|
(defn penpot-defrecord
|
||||||
[{:keys [:node]}]
|
[{:keys [:node]}]
|
||||||
(let [[rnode rtype rparams & other] (:children node)
|
(let [[rnode rtype rparams & other] (:children node)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue