From: Luc Teirlinck <teirllm@auburn.edu>
Date: Sun, 10 Apr 2005 18:38:43 +0000 (+0000)
Subject: (custom-set-minor-mode): Any non-nil value for the variable should
X-Git-Tag: ttn-vms-21-2-B4~1101
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5c5fc296bc442f699bc131e7808f880b24a01aee;p=emacs.git

(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 77b54a109c5..019fdb79b38 100644
--- 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."