[#10396] Quoted text (using markdown) in dark mode is hardly visible

Signed-off-by: Andrey Shovkoplyas <motor4ik@gmail.com>
This commit is contained in:
Andrey Shovkoplyas 2020-04-22 14:52:25 +02:00
parent c65ca5c92e
commit f170512e8f
No known key found for this signature in database
GPG Key ID: EAAB7C8622D860A4
2 changed files with 12 additions and 12 deletions

View File

@ -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})

View File

@ -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)))