(vc-annotate-background): Fix custom type.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 37938c1bc44ac78dcff7b71831dacc48fac9d641..1097aea3d720fc0f282be34a0a6055e6c17c3680 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-19  Gustav H\e$(Q)[\e(Bllberg  <gustav@virtutech.com>  (tiny change)
+
+       * vc.el (vc-annotate-background): Fix custom type.
+
 2008-03-19  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * descr-text.el (describe-char-unidata-list): Allow specifying

diff --git a/lisp/vc.el b/lisp/vc.el
index 742e960fbc7057954087ab2a0129ea4b5c7b6dde..274376765c57d4a79db6d17cf9f9912ab8173ff9 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -851,7 +851,7 @@ all other colors between (excluding black and white)."
 (defcustom vc-annotate-background "black"
   "Background color for \\[vc-annotate].
 Default color is used if nil."
-  :type 'string
+  :type '(choice (const :tag "Default background" nil) (color))
   :group 'vc)
 
 (defcustom vc-annotate-menu-elements '(2 0.5 0.1 0.01)