class: InspectorView
authorClaus Gittinger <cg@exept.de>
Tue, 05 May 2015 14:08:17 +0200
changeset 15614 de6d6fe7464d
parent 15613 00f739f2e1ef
child 15615 895e545534f0
child 15616 325be5f3e308
class: InspectorView changed: #doBrowse:
InspectorView.st
--- a/InspectorView.st	Tue May 05 13:14:36 2015 +0200
+++ b/InspectorView.st	Tue May 05 14:08:17 2015 +0200
@@ -2294,8 +2294,10 @@
     |cls|
 
     cls := what class.
-    (cls browserClass ? UserPreferences systemBrowserClass) 
-        openInClass:cls selector:nil
+    [
+        (cls browserClass ? UserPreferences systemBrowserClass) 
+            openInClass:cls selector:nil
+    ] browse
 
     "Created: / 14-12-1995 / 19:15:50 / cg"
     "Modified: / 27-07-2012 / 22:42:44 / cg"
@@ -4086,10 +4088,10 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.343 2015-05-05 11:14:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.344 2015-05-05 12:08:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.343 2015-05-05 11:14:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.344 2015-05-05 12:08:17 cg Exp $'
 ! !