[nongnu] elpa/geiser 486c39cfbd: Fix for autodoc in geiser-capf--company-docsig and beyond

[ELPA Syncer]

branch: elpa/geiser
commit 486c39cfbdf1789fe493535b7e0ae72ff518e53e
Author: jao <j...@gnu.org>
Commit: jao <j...@gnu.org>

    Fix for autodoc in geiser-capf--company-docsig and beyond
    
    Thanks to Panagiotis Vlantis, see issue #54
---
 elisp/geiser-autodoc.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/elisp/geiser-autodoc.el b/elisp/geiser-autodoc.el
index 1ce2936b86..20ef499334 100644
--- a/elisp/geiser-autodoc.el
+++ b/elisp/geiser-autodoc.el
@@ -64,8 +64,10 @@ when `geiser-autodoc-display-module-p' is on."
     (when res
       (dolist (item res)
         (push (cons (format "%s" (car item)) (cdr item)) signs))
-      (let ((str (geiser-autodoc--autodoc (geiser-syntax--scan-sexps) nil 
signs)))
-        (funcall callback str))
+      (when (functionp callback)
+        (let* ((path (geiser-syntax--scan-sexps))
+               (str (geiser-autodoc--autodoc path nil signs)))
+          (funcall callback str)))
       (setq geiser-autodoc--cached-signatures signs))))
 
 (defun geiser-autodoc--get-signatures (funs callback)