customize-mark-as-set for M-x foo-mode

["Stefan Monnier" <monnier+gnu/emacs@rum.cs.yale.edu>]

I see that all the minor-mode-like things in the menu-bar
do (customize-mark-as-set 'foo).  I also saw Per's comment
that this should only be done when the command is executed
interactively.

Is there any reason why it's only executed when run from the
menu-bar rather than from M-x ?

I.e. any objection to doing it for all global minor-modes whenever they are
called interactively ?


	Stefan


--- easy-mmode.el.~1.40.~	Wed Aug 14 21:04:45 2002
+++ easy-mmode.el	Mon Aug 19 16:50:45 2002
@@ -190,11 +185,13 @@
 	 ,@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)
+	     (progn
+	       ,(if globalp `(customize-mark-as-set ',mode))
 	     (message ,(format "%s %%sabled" pretty-name)
-		      (if ,mode "en" "dis")))
+			(if ,mode "en" "dis"))))
 	 (force-mode-line-update)
+	 ;; Return the new setting.
 	 ,mode)
 
        ;; Autoloading an easy-mmode-define-minor-mode autoloads