branch: elpa/geiser-guile
commit ea9e3414b9365f3333d54538749a29b34398ff35
Author: Jose Antonio Ortega Ruiz <[email protected]>
Commit: Jose Antonio Ortega Ruiz <[email protected]>
Bug fix.
---
geiser/introspection.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/geiser/introspection.scm b/geiser/introspection.scm
index cab11fd..de1020f 100644
--- a/geiser/introspection.scm
+++ b/geiser/introspection.scm
@@ -47,8 +47,8 @@
(cond ((symbol? lst) (or (describe-application (list lst))
(describe-application form)))
((pair? lst)
- (or (autodoc lst)
- (autodoc (map (lambda (s) (if (list? s) (gensym) s))
form))))
+ (or (autodoc (pair->list lst))
+ (autodoc (map (lambda (s) (if (pair? s) (gensym) s))
form))))
(else (describe-application form)))))
(else #f)))
