From aa4008091c9adcc23924983f45eb442f55217056 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 10 Aug 2014 02:55:39 +0300 Subject: [PATCH] * lisp/vc/vc-annotate.el (vc-annotate-background-mode): Add :set to reevaluate `vc-annotate-color-map'. Fixes: debbugs:18189 --- lisp/ChangeLog | 5 +++++ lisp/vc/vc-annotate.el | 6 ++++++ 2 files changed, 11 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f62d0ee3b66..b0a0e0c95a0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-08-09 Juri Linkov + + * vc/vc-annotate.el (vc-annotate-background-mode): Add :set + to reevaluate `vc-annotate-color-map'. (Bug#18189) + 2014-08-09 Alan Mackenzie * progmodes/cc-fonts.el (c-font-lock-declarators): Remove check diff --git a/lisp/vc/vc-annotate.el b/lisp/vc/vc-annotate.el index d3e10a63f56..a9085bc901f 100644 --- a/lisp/vc/vc-annotate.el +++ b/lisp/vc/vc-annotate.el @@ -54,6 +54,12 @@ When nil, the color range from `vc-annotate-color-map' is applied to the foreground, and the color from the option `vc-annotate-background' is applied to the background." :type 'boolean + :set (lambda (symbol value) + (set-default symbol value) + (when (boundp 'vc-annotate-color-map) + (ignore-errors + ;; Update the value of the dependent variable. + (custom-reevaluate-setting 'vc-annotate-color-map)))) :version "24.5" :group 'vc) -- 2.11.4.GIT