emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/embark 2eac4d2b4a 1/2: (documentation fn) fails if fn i


From: ELPA Syncer
Subject: [elpa] externals/embark 2eac4d2b4a 1/2: (documentation fn) fails if fn is still unbound
Date: Mon, 2 May 2022 22:57:28 -0400 (EDT)

branch: externals/embark
commit 2eac4d2b4a75d12b327a49328c8fed85e8b70e91
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>

    (documentation fn) fails if fn is still unbound
---
 embark.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/embark.el b/embark.el
index 2581ec216f..90576fa3d0 100644
--- a/embark.el
+++ b/embark.el
@@ -2621,7 +2621,8 @@ Returns the name of the command."
                  (when-let (target (embark-collect--target))
                    (let ((prefix-arg arg))
                      (embark--act action target)))))
-    (put name 'function-documentation (documentation action))
+    (when (fboundp action)
+      (put name 'function-documentation (documentation action)))
     name))
 
 (defun embark--all-bindings (keymap &optional nested)



reply via email to

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