diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-02-11 09:11:03 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-02-11 09:11:03 -0700 |
| commit | eef9245eb810820643a5960426265edd5578c656 (patch) | |
| tree | fc3e03246e87372a39d856bc6d3714bc29f7aa0b | |
| parent | e460316774e9e0f61d447dfde16e92313eb30535 (diff) | |
| download | fork-ledger-eef9245eb810820643a5960426265edd5578c656.tar.gz fork-ledger-eef9245eb810820643a5960426265edd5578c656.tar.bz2 fork-ledger-eef9245eb810820643a5960426265edd5578c656.zip | |
Face reorganization and better color theme
Moved all face definitions to leg-fonts.el. Change default colors to Solarize color theme http://ethanschoonover.com/solarized
| -rw-r--r-- | lisp/ldg-fonts.el | 14 | ||||
| -rw-r--r-- | lisp/ldg-occur.el | 10 |
2 files changed, 12 insertions, 12 deletions
diff --git a/lisp/ldg-fonts.el b/lisp/ldg-fonts.el index 6ddc811c..d72c9403 100644 --- a/lisp/ldg-fonts.el +++ b/lisp/ldg-fonts.el @@ -22,7 +22,7 @@ (defgroup ledger-faces nil "Ledger mode highlighting" :group 'ledger) (defface ledger-font-uncleared-face - `((t :foreground "green" :weight bold )) + `((t :foreground "#dc322f" :weight bold )) "Default face for Ledger" :group 'ledger-faces) @@ -32,7 +32,7 @@ :group 'ledger-faces) (defface ledger-font-highlight-face - `((t :background "#eee8d5")) + `((t :background "white")) "Default face for transaction under point" :group 'ledger-faces) @@ -56,6 +56,16 @@ "Face for Ledger amounts" :group 'ledger-faces) +(defface ledger-occur-folded-face + `((t :foreground "grey70" :invisible t )) + "Default face for Ledger occur mode hidden transactions" + :group 'ledger-faces) + +(defface ledger-occur-xact-face + `((t :background "#eee8d5" )) + "Default face for Ledger occur mode shown transactions" + :group 'ledger-faces) + (defface ledger-font-comment-face `((t :foreground "#93a1a1" :slant italic)) "Face for Ledger comments" diff --git a/lisp/ldg-occur.el b/lisp/ldg-occur.el index 1afb0e90..bd5a49b1 100644 --- a/lisp/ldg-occur.el +++ b/lisp/ldg-occur.el @@ -32,16 +32,6 @@ ;;; Code: -(defface ledger-occur-folded-face - `((t :foreground "grey70" :invisible t )) - "Default face for Ledger occur mode hidden transactions" - :group 'ledger-faces) - -(defface ledger-occur-xact-face - `((t :background "blue" :weight normal )) - "Default face for Ledger occur mode shown transactions" - :group 'ledger-faces) - (defconst ledger-occur-overlay-property-name 'ledger-occur-custom-buffer-grep) (defcustom ledger-occur-use-face-unfolded t |