- Smalltalk current createPackage: 'Helios-Workspace-Tests'!
- TestCase subclass: #HLCodeWidgetTest
- instanceVariableNames: ''
- package: 'Helios-Workspace-Tests'!
- !HLCodeWidgetTest methodsFor: 'tests'!
- testKeyMap
- "Key maps are a collection of associations."
- self assert: ( HLCodeWidget pcKeyMap isKindOf: HashedCollection ).
- self assert: ( HLCodeWidget macKeyMap isKindOf: HashedCollection ).
- ! !
|
