Improve readability of RGBA and HSLA values in inspect mode (#5918)

*  Improve readability of RGBA and HSLA values in inspect mode

* 📎 Remove reader conditionals for format common methods
This commit is contained in:
Elena Torró 2025-02-24 09:08:42 +01:00 committed by GitHub
parent 1c98c53805
commit bcea19001e
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
5 changed files with 49 additions and 29 deletions

View file

@ -129,13 +129,14 @@
[:& cb/color-name {:color color :size 90}]
(case format
:hex [:& cb/color-name {:color color}]
:rgba (let [[r g b a] (cc/hex->rgba (:color color) (:opacity color))]
(str/ffmt "%, %, %, %" r g b a))
:rgba (let [[r g b a] (cc/hex->rgba (:color color) (:opacity color))
result (cc/format-rgba [r g b a])]
[:* result])
:hsla (let [[h s l a] (cc/hex->hsla (:color color) (:opacity color))
result (cc/format-hsla [h s l a])]
[:* result])))]
(when-not (:gradient color)
(when (and (not (:gradient color)) (= :hex format))
[:span {:class (stl/css :opacity-info)}
(dm/str (-> color
(:opacity)

View file

@ -63,10 +63,10 @@
(not= color :multiple)
(case format
:rgba (let [[r g b] (cc/hex->rgb color)]
(str/fmt "rgba(%s, %s, %s, %s)" r g b opacity))
(str/fmt "rgba(%s)" (cc/format-rgba [r g b opacity])))
:hsla (let [[h s l] (cc/hex->hsl color)]
(str/fmt "hsla(%s, %s, %s, %s)" h (* 100 s) (* 100 l) opacity))
(str/fmt "hsla(%s)" (cc/format-hsla [h s l opacity])))
:hex (str color (str/upper (d/opacity-to-hex opacity))))