diff options
| -rw-r--r-- | geiser/doc.scm | 2 |
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))))))) |