diff options
| author | Luc Teirlinck | 2005-04-10 18:38:43 +0000 |
|---|---|---|
| committer | Luc Teirlinck | 2005-04-10 18:38:43 +0000 |
| commit | 5c5fc296bc442f699bc131e7808f880b24a01aee (patch) | |
| tree | 692a7200bff1330c4b6289bf21ba94fc8de24696 | |
| parent | 4bcb9c95c11c7fd05710d2f2bf78015d3de8176a (diff) | |
| download | emacs-5c5fc296bc442f699bc131e7808f880b24a01aee.tar.gz emacs-5c5fc296bc442f699bc131e7808f880b24a01aee.zip | |
(custom-set-minor-mode): Any non-nil value for the variable should
enable the mode when set through Custom.
| -rw-r--r-- | lisp/custom.el | 4 |
1 files changed, 2 insertions, 2 deletions
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, | |||
| 841 | this sets the local binding in that buffer instead." | 841 | this sets the local binding in that buffer instead." |
| 842 | (if custom-local-buffer | 842 | (if custom-local-buffer |
| 843 | (with-current-buffer custom-local-buffer | 843 | (with-current-buffer custom-local-buffer |
| 844 | (funcall variable (or value 0))) | 844 | (funcall variable (if value 1 0))) |
| 845 | (funcall variable (or value 0)))) | 845 | (funcall variable (if value 1 0)))) |
| 846 | 846 | ||
| 847 | (defun custom-quote (sexp) | 847 | (defun custom-quote (sexp) |
| 848 | "Quote SEXP iff it is not self quoting." | 848 | "Quote SEXP iff it is not self quoting." |