# HG changeset patch # User Stefan Vogel # Date 1259835718 -3600 # Node ID 34141a7227caae123dd25d510fd4b353d394e7e4 # Parent e19553d7e8642fe5cb1ef89ed2460ded62093457 changed: #openOn:monitor: - show correct name 'Inspector' instead of 'StandardSystemView' in process monitor - show Inspector icon diff -r e19553d7e864 -r 34141a7227ca InspectorView.st --- 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 $' ! !