diff --git a/code/tty-inspect.lisp b/code/tty-inspect.lisp
index 9dbe5d5b0c0773299fa1e0fcca14b065346c38ae..9afeb71ce3daabfce2e29265ebad74875473c478 100644
--- a/code/tty-inspect.lisp
+++ b/code/tty-inspect.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/tty-inspect.lisp,v 1.15 1994/10/31 04:11:27 ram Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/tty-inspect.lisp,v 1.16 1998/03/26 13:12:31 pw Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -150,7 +150,7 @@
     (instance (describe-instance-parts object :structure))
     (function
      (if (kernel:funcallable-instance-p object)
-	 (describe-instance-parts object :funcallabe-instance)
+	 (describe-instance-parts object :funcallable-instance)
 	 (describe-function-parts object)))
     (vector (describe-vector-parts object))
     (array (describe-array-parts object))