(custom-set-minor-mode): Any non-nil value for the variable should

enable the mode when set through Custom.

diff --git a/lisp/custom.el b/lisp/custom.el
index 77b54a109c5395389b448d0ef32770f274e1e1bc..019fdb79b387f55c196d4fb82690dc993812358b 100644 (file)
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -841,8 +841,8 @@ but if `custom-local-buffer' is non-nil,
 this sets the local binding in that buffer instead."
   (if custom-local-buffer
       (with-current-buffer custom-local-buffer
-       (funcall variable (or value 0)))
-    (funcall variable (or value 0))))
+       (funcall variable (if value 1 0)))
+    (funcall variable (if value 1 0))))
 
 (defun custom-quote (sexp)
   "Quote SEXP iff it is not self quoting."