branch: externals/leaf
commit 841847361405bb01bb116468a6863191490ece57
Author: Naoya Yamashita <con...@gmail.com>
Commit: Caowei <igoo...@gmail.com>

    transform nil to ()
---
 leaf-tests.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/leaf-tests.el b/leaf-tests.el
index 191d7a626e..ed3108e5f2 100644
--- a/leaf-tests.el
+++ b/leaf-tests.el
@@ -2454,7 +2454,7 @@ Example:
        (let* ((old (lookup-key global-map (kbd "M-s O")))
               (value `(global-map "M-s O" *lambda-function* ,(and old (not 
(numberp old)) old) nil)))
          (leaf-safe-push value leaf-key-bindlist)
-         (define-key global-map (kbd "M-s O") (lambda nil "color-moccur" 
(interactive) (color-moccur))))))))
+         (define-key global-map (kbd "M-s O") (lambda () "color-moccur" 
(interactive) (color-moccur))))))))
 
 (when (version< "24.0" emacs-version)
   (cort-deftest-with-macroexpand leaf/leaf-key-bind-keymap

Reply via email to