From 544468de3dc8ba6f19b16cf0b9da6f4b91d483dd Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Sun, 13 Aug 2000 19:21:25 +0000 Subject: [PATCH] * emacs.scm (emacs-symdoc): Parenthesis fix. --- ice-9/emacs.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ice-9/emacs.scm b/ice-9/emacs.scm index 535e59ab6..850571d42 100644 --- a/ice-9/emacs.scm +++ b/ice-9/emacs.scm @@ -248,7 +248,7 @@ (define (emacs-symdoc symbol) (if (or (not (module-bound? (current-module) symbol)) - (not (procedure? (eval symbol) (interaction-environment)))) + (not (procedure? (eval symbol (interaction-environment))))) 'nil (procedure-documentation (eval symbol (interaction-environment)))))