branch: elpa/slime
commit 929753a0dfb04832e3e358e5c83a90086111aedf
Author: Stas Boukarev <stass...@gmail.com>
Commit: Stas Boukarev <stass...@gmail.com>
Fix ECL.
Fixes #849
---
swank.lisp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/swank.lisp b/swank.lisp
index 7cc332231a..ec34ab9c29 100644
--- a/swank.lisp
+++ b/swank.lisp
@@ -3519,7 +3519,7 @@ Return NIL if LIST is circular."
(:value ,*readtable*) ") it is a macro character: "
(:value ,(get-macro-character char))))))
-(unless (find-method #'emacs-inspect nil (list (find-class t)))
+(unless (find-method #'emacs-inspect nil (list (find-class t)) nil)
(defmethod emacs-inspect ((object t))
"Generic method for inspecting any kind of object.
