* [PATCH 4/7] git-blame.el: improve color handling
@ 2007-02-09 8:21 David Kågedal
0 siblings, 0 replies; only message in thread
From: David Kågedal @ 2007-02-09 8:21 UTC (permalink / raw)
To: git
Signed-off-by: David Kågedal <davidk@lysator•liu.se>
---
contrib/emacs/git-blame.el | 24 ++++++++++--------------
1 files changed, 10 insertions(+), 14 deletions(-)
diff --git a/contrib/emacs/git-blame.el b/contrib/emacs/git-blame.el
index c99437e..7ffc153 100644
--- a/contrib/emacs/git-blame.el
+++ b/contrib/emacs/git-blame.el
@@ -95,16 +95,10 @@
colors))
(defvar git-blame-dark-colors
- (color-scale '("00" "04" "08" "0c"
- "10" "14" "18" "1c"
- "20" "24" "28" "2c"
- "30" "34" "38" "3c")))
+ (color-scale '("0c" "04" "24" "1c" "2c" "34" "14" "3c")))
(defvar git-blame-light-colors
- (color-scale '("c0" "c4" "c8" "cc"
- "d0" "d4" "d8" "dc"
- "e0" "e4" "e8" "ec"
- "f0" "f4" "f8" "fc")))
+ (color-scale '("c4" "d4" "cc" "dc" "f4" "e4" "fc" "ec")))
(defvar git-blame-ancient-color "dark green")
@@ -127,13 +121,15 @@
(make-local-variable 'git-blame-overlays)
(make-local-variable 'git-blame-colors)
(make-local-variable 'git-blame-cache)
- (let ((bgmode (cdr (assoc 'background-mode (frame-parameters)))))
- (if (eq bgmode 'dark)
- (setq git-blame-colors git-blame-dark-colors)
- (setq git-blame-colors git-blame-light-colors)))
+ (git-blame-cleanup)
(if git-blame-mode
- (git-blame-run)
- (git-blame-cleanup)))
+ (progn
+ (let ((bgmode (cdr (assoc 'background-mode (frame-parameters)))))
+ (if (eq bgmode 'dark)
+ (setq git-blame-colors git-blame-dark-colors)
+ (setq git-blame-colors git-blame-light-colors)))
+ (setq git-blame-cache (make-hash-table :test 'equal))
+ (git-blame-run))))
(defun git-blame-run ()
(let* ((display-buf (current-buffer))
--
1.5.0.rc3.204.g93c76
--
David Kågedal
^ permalink raw reply related [flat|nested] only message in thread
only message in thread, other threads:[~2007-02-09 8:35 UTC | newest]
Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2007-02-09 8:21 [PATCH 4/7] git-blame.el: improve color handling David Kågedal
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox