diff --git a/interface/inspect.lisp b/interface/inspect.lisp
index 0de1fd4cba72df2c4b5e784321157fa71e2a902f..c0f7e7cdc1c2951eb0da47d11760b0805b0949e7 100644
--- a/interface/inspect.lisp
+++ b/interface/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/interface/inspect.lisp,v 1.10 1994/10/31 04:53:18 ram Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/interface/inspect.lisp,v 1.11 2003/12/03 07:56:09 emarsden Rel $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -174,6 +174,9 @@
       (format nil "List of length ~a" (length l))
       (format nil "Dotted Pair")))
 
+(defmethod inspector-pane-title ((i integer))
+  (format nil "Integer ~D" i))
+
 
 
 ;;;; Methods for displaying object inspection panes