3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-25 20:57:23 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Plugins support for code generation

Browse source
This commit is contained in:
alonso.torres 2024-06-24 15:26:21 +02:00
parent 8ff0015458
commit f86156b619
4 changed files with 61 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

12
frontend/src/app/util/code_gen.cljs
View file

@ -19,8 +19,10 @@
(generate-markup objects shapes)))
(defn generate-style-code
[objects type root-shapes all-shapes]
(let [generate-style
(case type
"css" css/generate-style)]
(generate-style objects root-shapes all-shapes)))
([objects type root-shapes all-shapes]
(generate-style-code objects type root-shapes all-shapes nil))
([objects type root-shapes all-shapes options]
(let [generate-style
(case type
"css" css/generate-style)]
(generate-style objects root-shapes all-shapes options))))

4
frontend/src/app/util/code_gen/style_css.cljs
View file

@ -300,10 +300,10 @@ body {
(defn generate-style
([objects root-shapes all-shapes]
(generate-style objects root-shapes all-shapes nil))
([objects root-shapes all-shapes options]
([objects root-shapes all-shapes {:keys [with-prelude?] :or {with-prelude? true} :as options}]
(let [options (assoc options :root-shapes (into #{} (map :id) root-shapes))]
(dm/str
prelude
(if with-prelude? prelude "")
(->> all-shapes
(keep #(get-shape-css-selector % objects options))
(str/join "\n\n"))))))