--- a/InspectorView.st	Thu Nov 11 10:14:21 2004 +0100
+++ b/InspectorView.st	Thu Nov 11 10:51:15 2004 +0100
@@ -1530,14 +1530,15 @@
 
     (self class == InspectorView
     and:[anObject inspectorClass ~~ InspectorView]) ifTrue:[
-        lbl := 'BasicInspector on: %1'
+        lbl := 'BasicInspector on: '
     ] ifFalse:[
-        lbl := 'Inspector on: %1'
+        lbl := 'Inspector on: '
     ].
     (anObject isImmediate
     or:[anObject isBoolean]) ifFalse:[
-        lbl := lbl , ' <%2>'
+        lbl := lbl , '<%2> ' 
     ].
+    lbl := lbl , '%1'.
 
     IdDictionary isNil ifTrue:[
         IdDictionary := WeakIdentityDictionary new.
@@ -1766,5 +1767,5 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.156 2004-09-21 10:30:52 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.157 2004-11-11 09:51:15 cg Exp $'
 ! !