diff --git a/interface/inspect.lisp b/interface/inspect.lisp
index d7595c9caa06617284e463b7353a182c9acd3b1e..01bfac71faaa507e721baec6e05becb987adce8c 100644
--- a/interface/inspect.lisp
+++ b/interface/inspect.lisp
@@ -135,7 +135,7 @@
 ;;;
 (defmethod inspector-pane-title (object)
   (typecase object
-    (pcl::std-instance
+    (standard-object
      (format nil "Instance ~a of Class ~a"
 	     object (pcl::class-name (pcl::class-of object))))
     (function (format nil "~a" object))
@@ -235,7 +235,7 @@
 ;;;
 (defmethod display-inspector-pane (object)
   (typecase object
-    (pcl::std-instance (display-clos-pane object))
+    (standard-object (display-clos-pane object))
     (function (display-function-pane object))
     (structure-object (display-structure-pane object))
     (t