emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 02cbb37 1/2: Allow nil initializers in define-minor-mode


From: Lars Ingebrigtsen
Subject: master 02cbb37 1/2: Allow nil initializers in define-minor-mode
Date: Sat, 31 Jul 2021 07:29:35 -0400 (EDT)

branch: master
commit 02cbb37de73d563149389615ee44741322007108
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Allow nil initializers in define-minor-mode
    
    * lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Make the
    meaning of :initialize nil and a missing :initialize the same.
---
 lisp/emacs-lisp/easy-mmode.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 3a00fdb..6530d06 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -251,7 +251,9 @@ INIT-VALUE LIGHTER KEYMAP.
                    (setq getter `(default-value ',mode))))
        (:extra-args (setq extra-args (pop body)))
        (:set (setq set (list :set (pop body))))
-       (:initialize (setq initialize (list :initialize (pop body))))
+       (:initialize
+         (when-let ((val (pop body)))
+           (setq initialize (list :initialize val))))
        (:type (setq type (list :type (pop body))))
        (:keymap (setq keymap (pop body)))
        (:interactive (setq interactive (pop body)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]