InspectorView.st
changeset 13 145a9461122e
parent 8 93b3dc7fa0a5
child 17 58c360f199be
--- a/InspectorView.st	Sun Dec 19 01:43:32 1993 +0100
+++ b/InspectorView.st	Mon Dec 20 00:44:35 1993 +0100
@@ -33,7 +33,7 @@
 The system calls the inspector through the global variable "Inspector"
 which is bound to this class (but could be redefined).
 
-$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.4 1993-12-11 01:45:39 claus Exp $
+$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.5 1993-12-19 23:44:35 claus Exp $
 written winter 89 by claus
 '!
 
@@ -57,7 +57,7 @@
     |topView inspectorView|
 
     topView := StandardSystemView
-                    label:(anObject class name)
+                    label:('Inspector on: ' , anObject classNameWithArticle)
                      icon:(Form fromFile:'Inspector.xbm' resolution:100)
                 minExtent:(100 @ 100).