feature/named-lambdas 25497696ff3: Give define-minor-mode's modes defining symbols.

[Alan Mackenzie]

branch: feature/named-lambdas
commit 25497696ff3d114467416304a94c20d48b6039d4
Author: Alan Mackenzie <acm@muc.de>
Commit: Alan Mackenzie <acm@muc.de>

    Give define-minor-mode's modes defining symbols.
    
    This is for these modes' defining symbols when native compiled.
    
    * lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Bind
    defining-symbol to the mode's symbol at macro-expansion time.
---
 lisp/emacs-lisp/easy-mmode.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 529f6e90e88..b8f1867abf9 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -245,6 +245,9 @@ INIT-VALUE LIGHTER KEYMAP.
         (hook-on (intern (concat mode-name "-on-hook")))
         (hook-off (intern (concat mode-name "-off-hook")))
          (interactive t)
+;;;; NEW STOUGH, 2023-10-26
+         (defining-symbol mode)
+;;;; END OF NEW STOUGH
          (warnwrap (if (or (null body) (keywordp (car body))) #'identity
                      (lambda (exp)
                        (macroexp-warn-and-return