From d99d3266b0dcf56f3f050dc9be2bdd3320b5e72c Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 26 Aug 2002 16:40:49 +0000 Subject: [PATCH] (define-minor-mode): Use customize-mark-as-set for global minor modes. --- lisp/emacs-lisp/easy-mmode.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 50b0f76c338..8f89d92a057 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -190,11 +190,13 @@ With zero or negative ARG turn mode off. ,@body ;; The on/off hooks are here for backward compatibility only. (run-hooks ',hook (if ,mode ',hook-on ',hook-off)) - ;; Return the new setting. (if (interactive-p) - (message ,(format "%s %%sabled" pretty-name) - (if ,mode "en" "dis"))) + (progn + ,(if globalp `(customize-mark-as-set ',mode)) + (message ,(format "%s %%sabled" pretty-name) + (if ,mode "en" "dis")))) (force-mode-line-update) + ;; Return the new setting. ,mode) ;; Autoloading an easy-mmode-define-minor-mode autoloads -- 2.39.5