A new version of Collections was added to project The Inbox:
http://source.squeak.org/inbox/Collections-cwp.486.mcz

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

Name: Collections-cwp.486
Author: cwp
Time: 13 August 2012, 11:29:37.608 pm
UUID: a704544c-0077-467c-b316-9b7dc2ebefa1
Ancestors: Collections-cwp.485

Make selector precedence behave correctly in the presence of underscores.

=============== Diff against Collections-cwp.485 ===============

Item was changed:
  ----- Method: Symbol>>precedence (in category 'accessing') -----
  precedence
  	"Answer the receiver's precedence, assuming it is a valid Smalltalk
  	message selector or 0 otherwise.  The numbers are 1 for unary,
  	2 for binary and 3 for keyword selectors."
  
  	self size = 0 ifTrue: [^ 0].
- 	self first isLetter ifFalse: [^ 2].
  	self last = $: ifTrue: [^ 3].
+ 	(self anySatisfy: [:c | c isLetter]) ifTrue: [^ 1].
+ 	^ 2!
- 	^ 1!