summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-10-16 04:14:37 +0100
committerjao <jao@gnu.org>2022-10-16 04:14:37 +0100
commit8637d72db828328ea645466036878820ec92d183 (patch)
treefd8d12fe56d23789a09db246a65ecac0498ce891
parentdbf07ebc781622184f6e944271c2d35becf9d13e (diff)
downloadgeiser-8637d72db828328ea645466036878820ec92d183.tar.gz
geiser-8637d72db828328ea645466036878820ec92d183.tar.bz2
fix for autodoc, ahem, extension
-rw-r--r--elisp/geiser-autodoc.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/elisp/geiser-autodoc.el b/elisp/geiser-autodoc.el
index 51bad79..924fadb 100644
--- a/elisp/geiser-autodoc.el
+++ b/elisp/geiser-autodoc.el
@@ -186,7 +186,7 @@ you can set this variable to nil to avoid them."
(while (and p (not s))
(setq s (or (cdr (assoc (car p) signs))
(cdr (geiser-edit--find-def (car p)))))
- (setq p (car path) path (cdr path)))
+ (unless s (setq p (car path) path (cdr path))))
(cond ((stringp s) s)
(s (geiser-autodoc--str p s)))))))