--- a/ProjectBrowser.st Fri Sep 24 18:29:31 1999 +0200
+++ b/ProjectBrowser.st Fri Sep 24 19:10:24 1999 +0200
@@ -631,7 +631,7 @@
#name: 'NewApplication'
#min: #(#Point 10 10)
#max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 3 77 303 377)
+ #bounds: #(#Rectangle 10 20 310 320)
)
#component:
#(#SpecCollection
@@ -645,6 +645,7 @@
#dataList: #classList
#has3Dsepartors: false
#columnHolder: #classTableColumns
+ #verticalSpacing: 0
#columnAdaptor: #classTableAdaptor
)
)
@@ -4065,7 +4066,8 @@
!
classIncludeConditionFromClassInfo:cInfo put:aSymbol
- cInfo conditionForInclusion:aSymbol
+ cInfo conditionForInclusion:aSymbol.
+ ^ cInfo
!
classNameFromClassInfo:cInfo