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

[Stefan Monnier]

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