mirror of
https://github.com/penpot/penpot.git
synced 2025-05-12 10:56:38 +02:00
🎉 Integrate exporter with svgclean.
This commit is contained in:
parent
70d464189f
commit
f66ddcaa2d
8 changed files with 165 additions and 75 deletions
|
@ -68,10 +68,13 @@
|
|||
|
||||
(defn- do-svg-clean
|
||||
[ctx data]
|
||||
(let [res (promise)
|
||||
cleaner (->> (graal/source "js" "require('svgclean')")
|
||||
(graal/eval! ctx))
|
||||
resultp (graal/invoke-member cleaner "optimize" data)]
|
||||
(let [res (promise)
|
||||
bindings (graal/get-bindings ctx "js")
|
||||
optimize (-> (graal/get-bindings ctx "js")
|
||||
(graal/get-member "svgc")
|
||||
(graal/get-member "optimize"))
|
||||
resultp (graal/invoke optimize data)]
|
||||
|
||||
(graal/invoke-member resultp "then"
|
||||
(reify Consumer
|
||||
(accept [_ val]
|
||||
|
|
|
@ -34,8 +34,8 @@
|
|||
(.eval ^Context ctx ^Source source))
|
||||
|
||||
(defn ^Value get-bindings
|
||||
[ctx]
|
||||
(.getBindings ^Context ctx))
|
||||
[ctx lang]
|
||||
(.getBindings ^Context ctx ^String lang))
|
||||
|
||||
(defn ^Value get-member
|
||||
[vobj name]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue