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

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 37938c1bc44..1097aea3d72 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-19  Gustav H$(Q)[(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 742e960fbc7..274376765c5 100644
--- 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)