Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-04-06 03:51:21 -05:00
Code Issues Activity

🐛 Try to remove cases when the thumbnail could be empty

Browse source
This commit is contained in:
alonso.torres 2023-01-23 14:07:51 +01:00
parent 1c54e9fa4d
commit 316b3d4539
2 changed files with 39 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

43
frontend/src/app/main/ui/workspace/shapes/frame/thumbnail_render.cljs
View file

@ -114,26 +114,37 @@
generate-thumbnail
(mf/use-callback
(fn []
(let [node @node-ref
frame-html (dom/node->xml node)
(fn generate-thumbnail []
(try
(let [node @node-ref]
(if (dom/has-children? node)
;; The frame-content need to have children in order to generate the thumbnail
(let [frame-html (dom/node->xml node)
style-node (dom/query (dm/str "#frame-container-" (:id shape) " style"))
style-str (or (-> style-node dom/node->xml) "")
{:keys [x y width height]} @shape-bb-ref
{:keys [x y width height]} @shape-bb-ref
viewbox (dm/str x " " y " " width " " height)
style-node (dom/query (dm/str "#frame-container-" (:id shape) " style"))
style-str (or (-> style-node dom/node->xml) "")
svg-node
(-> (dom/make-node "http://www.w3.org/2000/svg" "svg")
(dom/set-property! "version" "1.1")
(dom/set-property! "viewBox" viewbox)
(dom/set-property! "width" width)
(dom/set-property! "height" height)
(dom/set-property! "fill" "none")
(obj/set! "innerHTML" (dm/str style-str frame-html)))
svg-node
(-> (dom/make-node "http://www.w3.org/2000/svg" "svg")
(dom/set-property! "version" "1.1")
(dom/set-property! "viewBox" (dm/str x " " y " " width " " height))
(dom/set-property! "width" width)
(dom/set-property! "height" height)
(dom/set-property! "fill" "none")
(obj/set! "innerHTML" (dm/str style-str frame-html)))
img-src (-> svg-node dom/node->xml dom/svg->data-uri)]
img-src
(-> svg-node dom/node->xml dom/svg->data-uri)]
(reset! image-url img-src))))
(reset! image-url img-src))
;; Node not yet ready, we schedule a new generation
(ts/schedule generate-thumbnail)))
(catch :default e
(.error js/console e)))))
on-change-frame
(mf/use-callback

14
frontend/src/app/util/dom.cljs
View file

@ -264,12 +264,14 @@
(defn append-child!
[^js el child]
(when (some? el)
(.appendChild ^js el child)))
(.appendChild ^js el child))
el)
(defn remove-child!
[^js el child]
(when (some? el)
(.removeChild ^js el child)))
(.removeChild ^js el child))
el)
(defn get-first-child
[^js el]
@ -639,3 +641,11 @@
{:ascent (.-fontBoundingBoxAscent measure)
:descent (.-fontBoundingBoxDescent measure)}))
(defn clone-node
[^js node]
(.cloneNode node))
(defn has-children?
[^js node]
(> (-> node .-children .-length) 0))