summaryrefslogtreecommitdiff
path: root/geiser
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-03-06 02:49:13 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-03-06 02:49:13 +0100
commitd71825cd8e95d4b17631d4f2ce0a26a12f67b199 (patch)
tree11bbfc3cbf5bfb92d1bafd88e6f1000c15c92c7d /geiser
parentd5ff699cf64305c6264941a9e8e6b89e39aac199 (diff)
downloadgeiser-guile-d71825cd8e95d4b17631d4f2ce0a26a12f67b199.tar.gz
geiser-guile-d71825cd8e95d4b17631d4f2ce0a26a12f67b199.tar.bz2
Small bug fix.
Diffstat (limited to 'geiser')
-rw-r--r--geiser/doc.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/geiser/doc.scm b/geiser/doc.scm
index 35c5bfb..a58f1d9 100644
--- a/geiser/doc.scm
+++ b/geiser/doc.scm
@@ -48,7 +48,7 @@
(else
(let ((lst (last form)))
(cond ((and (symbol? lst) (describe-application (list lst))))
- ((and (pair? lst) (not (memq (car lst) '(quote)))) (autodoc lst))
+ ((and (pair? lst) (not (memq (car lst) '(quote))) (autodoc lst)))
((pair? lst) (autodoc (flatten-last form)))
(else (describe-application form)))))))