--- a/Workspace.st Thu Jul 17 03:45:24 2014 +0000
+++ b/Workspace.st Sun Jul 27 13:11:59 2014 +0200
@@ -311,6 +311,7 @@
DefaultViewBackground := StyleSheet colorAt:'codeView.backgroundColor'.
! !
+
!Workspace class methodsFor:'getting a new Workspace'!
open
@@ -1798,7 +1799,7 @@
browserClass
browseRefsTo:nameOfVariable
classVars:true
- in:(cls whichClassDefinesClassVar:nameOfVariable) withAllSubclasses
+ in:(cls theNonMetaclass whichClassDefinesClassVar:nameOfVariable) withAllSubclasses
modificationsOnly:false.
] ifFalse:[
"/ is it a private class?
@@ -2332,10 +2333,10 @@
!Workspace class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.335 2014-07-09 02:01:04 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.336 2014-07-27 11:11:59 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.335 2014-07-09 02:01:04 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.336 2014-07-27 11:11:59 cg Exp $'
! !