The Trunk: ToolsTests-cmm.68.mcz

Chris Muller uploaded a new version of ToolsTests to project The Trunk:
http://source.squeak.org/trunk/ToolsTests-cmm.68.mcz

==================== Summary ====================

Name: ToolsTests-cmm.68
Author: cmm
Time: 14 December 2013, 5:01:14.654 pm
UUID: 98c1608a-6cb3-4a03-a28a-dd101e6c876b
Ancestors: ToolsTests-fbs.67

Updated test to reflect new browsing behavior.

=============== Diff against ToolsTests-fbs.67 ===============

Item was changed:
  ----- Method: BrowseTest>>testBrowseMetaclass (in category 'testing') -----
  testBrowseMetaclass
  "self debug: #testBrowseMetaclass"
  | browsersBefore browsersAfter opened |
  self ensureMorphic.
 
  browsersBefore := self currentBrowsers.
  1 class class browse.
  browsersAfter := self currentBrowsers.
 
  self assert:  (browsersAfter size  = (browsersBefore size + 1)).
  opened := browsersAfter removeAll: browsersBefore; yourself.
  self assert:  (opened size = 1).
  opened := opened asArray first.
+ self assert: (opened model selectedClass == SmallInteger).
- self assert: (opened model selectedClass == Metaclass).
 
  opened delete
 
 
  !