[#10396] Quoted text (using markdown) in dark mode is hardly visible
Signed-off-by: Andrey Shovkoplyas <motor4ik@gmail.com>
This commit is contained in:
parent
c65ca5c92e
commit
f170512e8f
|
@ -41,7 +41,7 @@
|
||||||
:border-radius 32}))
|
:border-radius 32}))
|
||||||
|
|
||||||
(defn default-chat-icon-text [size]
|
(defn default-chat-icon-text [size]
|
||||||
{:color (colors/alpha colors/white 0.7)
|
{:color colors/white-transparent-70-persist
|
||||||
:font-weight "700"
|
:font-weight "700"
|
||||||
:font-size (/ size 2)
|
:font-size (/ size 2)
|
||||||
:line-height size})
|
:line-height size})
|
||||||
|
|
|
@ -299,34 +299,34 @@
|
||||||
:font-family monospace-fonts
|
:font-family monospace-fonts
|
||||||
:color colors/white))
|
:color colors/white))
|
||||||
|
|
||||||
(def default-blockquote-style
|
(defn default-blockquote-style []
|
||||||
{:style {:border-left-width 2
|
{:style {:border-left-width 2
|
||||||
:padding-left 3
|
:padding-left 3
|
||||||
:border-left-color colors/gray-transparent-40}})
|
:border-left-color colors/gray-transparent-40}})
|
||||||
|
|
||||||
(def outgoing-blockquote-style
|
(defn outgoing-blockquote-style []
|
||||||
(update default-blockquote-style :style
|
(update (default-blockquote-style) :style
|
||||||
assoc
|
assoc
|
||||||
:border-left-color colors/white-transparent))
|
:border-left-color colors/white-transparent-70-persist))
|
||||||
|
|
||||||
(defn blockquote-style [outgoing]
|
(defn blockquote-style [outgoing]
|
||||||
(if outgoing
|
(if outgoing
|
||||||
outgoing-blockquote-style
|
(outgoing-blockquote-style)
|
||||||
default-blockquote-style))
|
(default-blockquote-style)))
|
||||||
|
|
||||||
(def default-blockquote-text-style
|
(defn default-blockquote-text-style []
|
||||||
(update (default-text-style) :style
|
(update (default-text-style) :style
|
||||||
assoc
|
assoc
|
||||||
:line-height 19
|
:line-height 19
|
||||||
:font-size 14
|
:font-size 14
|
||||||
:color colors/black-transparent-50))
|
:color colors/black-transparent-50))
|
||||||
|
|
||||||
(def outgoing-blockquote-text-style
|
(defn outgoing-blockquote-text-style []
|
||||||
(update default-blockquote-text-style :style
|
(update (default-blockquote-text-style) :style
|
||||||
assoc
|
assoc
|
||||||
:color colors/white-transparent-70-persist))
|
:color colors/white-transparent-70-persist))
|
||||||
|
|
||||||
(defn blockquote-text-style [outgoing]
|
(defn blockquote-text-style [outgoing]
|
||||||
(if outgoing
|
(if outgoing
|
||||||
outgoing-blockquote-text-style
|
(outgoing-blockquote-text-style)
|
||||||
default-blockquote-text-style))
|
(default-blockquote-text-style)))
|
||||||
|
|
Loading…
Reference in New Issue