lisp: use more legible colors on dark backgrounds

On dark backgrounds, the color for the current transaction makes the
text quite unreadable. Let's use a darker color in this case. Maybe some
other colors could be adjusted.
This commit is contained in:
Vincent Bernat 2014-03-23 02:09:49 +01:00
parent 8cc9521a9a
commit cdeed89dbd

View file

@ -40,7 +40,8 @@
:group 'ledger-faces)
(defface ledger-font-xact-highlight-face
`((t :background "#eee8d5"))
`((((background dark)) :background "#1a1a1a" )
(t :background "#eee8d5"))
"Default face for transaction under point"
:group 'ledger-faces)
@ -80,7 +81,8 @@
:group 'ledger-faces)
(defface ledger-occur-xact-face
`((t :background "#eee8d5" ))
`((((background dark)) :background "#1a1a1a" )
(t :background "#eee8d5" ))
"Default face for Ledger occur mode shown transactions"
:group 'ledger-faces)