The Trunk: ShoutCore-ar.12.mcz

Andreas Raab uploaded a new version of ShoutCore to project The Trunk:
http://source.squeak.org/trunk/ShoutCore-ar.12.mcz

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

Name: ShoutCore-ar.12
Author: ar
Time: 5 March 2010, 9:06:01.082 pm
UUID: dc84f80f-9252-3f48-8451-e5f2739faa26
Ancestors: ShoutCore-kb.11

Avoid dictionary protocol in Smalltalk.

=============== Diff against ShoutCore-kb.11 ===============

Item was changed:
  ----- Method: SHMCClassDefinition>>hasBindingThatBeginsWith: (in category 'act like environment') -----
  hasBindingThatBeginsWith: aString
 
+ (Smalltalk globals hasBindingThatBeginsWith: aString) ifTrue: [^true].
- (Smalltalk hasBindingThatBeginsWith: aString) ifTrue: [^true].
  items do:[:each |
  (each isClassDefinition and: [each className beginsWith: aString])
  ifTrue:[^true]].
  ^false!