From 2174f90b64343c1af76c8e5469d5e4b69d709c08 Mon Sep 17 00:00:00 2001 From: jao Date: Fri, 21 Oct 2022 01:26:04 +0100 Subject: more tweaks to regexp signature finding and its use in autodoc (for instance, skip it when in the REPL). --- elisp/geiser-autodoc.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'elisp/geiser-autodoc.el') diff --git a/elisp/geiser-autodoc.el b/elisp/geiser-autodoc.el index 924fadb..f18a6ed 100644 --- a/elisp/geiser-autodoc.el +++ b/elisp/geiser-autodoc.el @@ -185,7 +185,8 @@ you can set this variable to nil to avoid them." (s)) (while (and p (not s)) (setq s (or (cdr (assoc (car p) signs)) - (cdr (geiser-edit--find-def (car p))))) + (and geiser-mode + (cdr (geiser-edit--find-def (car p) t))))) (unless s (setq p (car path) path (cdr path)))) (cond ((stringp s) s) (s (geiser-autodoc--str p s))))))) -- cgit v1.2.3