changed: #openOn:monitor:
- show correct name 'Inspector' instead of 'StandardSystemView'
in process monitor
- show Inspector icon
--- a/InspectorView.st Thu Dec 03 11:05:33 2009 +0100
+++ b/InspectorView.st Thu Dec 03 11:21:58 2009 +0100
@@ -137,13 +137,12 @@
|topView inspectorView|
topView := StandardSystemView new.
-"/ topView
-"/ icon:self defaultIcon;
-"/ label:'Inspector';
-"/ iconLabel:'Inspector'.
-
- topView extent:(self defaultTopViewExtent).
- topView objectAttributeAt:#rememberExtent put:true.
+ topView
+ icon:self defaultIcon;
+ label:'Inspector';
+ iconLabel:'Inspector';
+ extent:self defaultTopViewExtent;
+ objectAttributeAt:#rememberExtent put:true.
inspectorView := self origin:(0.0 @ 0.0)
corner:(1.0 @ 1.0)
@@ -2214,9 +2213,9 @@
!InspectorView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.202 2009-11-20 14:38:53 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.203 2009-12-03 10:21:58 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.202 2009-11-20 14:38:53 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.203 2009-12-03 10:21:58 stefan Exp $'
! !