0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-24 07:46:13 -05:00

🐛 Fix problem when exporting html texts

This commit is contained in:
alonso.torres 2024-03-25 15:35:04 +01:00
parent 588410bbb1
commit ecc61130ec
3 changed files with 17 additions and 16 deletions

View file

@ -21,10 +21,9 @@
shape (obj/get props "shape")
code? (obj/get props "code?")
text (:text node)
style (when-not code?
(if (= text "")
(sts/generate-text-styles shape parent)
(sts/generate-text-styles shape node)))
style (if (= text "")
(sts/generate-text-styles shape parent)
(sts/generate-text-styles shape node))
class (when code? (:$id node))]
[:span.text-node {:style style :class class}
(if (= text "") "\u00A0" text)]))
@ -36,7 +35,7 @@
children (obj/get props "children")
shape (obj/get props "shape")
code? (obj/get props "code?")
style (when-not code? (sts/generate-root-styles shape node))
style (sts/generate-root-styles shape node code?)
class (when code? (:$id node))]
[:div.root.rich-text
{:style style

View file

@ -17,16 +17,18 @@
[cuerdas.core :as str]))
(defn generate-root-styles
[{:keys [width height]} node]
(let [valign (:vertical-align node "top")
base #js {:height (fmt/format-pixels height)
:width (fmt/format-pixels width)
:display "flex"
:whiteSpace "break-spaces"}]
(cond-> base
(= valign "top") (obj/set! "alignItems" "flex-start")
(= valign "center") (obj/set! "alignItems" "center")
(= valign "bottom") (obj/set! "alignItems" "flex-end"))))
([props node]
(generate-root-styles props node false))
([{:keys [width height]} node code?]
(let [valign (:vertical-align node "top")
base #js {:height (when-not code? (fmt/format-pixels height))
:width (when-not code? (fmt/format-pixels width))
:display "flex"
:whiteSpace "break-spaces"}]
(cond-> base
(= valign "top") (obj/set! "alignItems" "flex-start")
(= valign "center") (obj/set! "alignItems" "center")
(= valign "bottom") (obj/set! "alignItems" "flex-end")))))
(defn generate-paragraph-set-styles
[{:keys [grow-type] :as shape}]

View file

@ -207,7 +207,7 @@ body {
(let [properties
(case (:type node)
(:root "root")
(sts/generate-root-styles shape node)
(sts/generate-root-styles shape node true)
(:paragraph-set "paragraph-set")
(sts/generate-paragraph-set-styles shape)