Alexander Lazarević uploaded a new version of ShoutCore to project The Trunk:
http://source.squeak.org/trunk/ShoutCore-laza.19.mcz

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

Name: ShoutCore-laza.19
Author: laza
Time: 29 April 2010, 4:30:33.725 pm
UUID: 93422ad0-5dad-453c-afd4-5bd9f0441432
Ancestors: ShoutCore-ul.18

Make Shout display symbols with underscores correctly if allowUnderscoreSelectors is true

=============== Diff against ShoutCore-ul.18 ===============

Item was changed:
  ----- Method: SHParserST80>>parseSymbolIdentifier (in category 'parse') -----
  parseSymbolIdentifier
  	| c start end |
  	c := self currentChar.
+ 	self failUnless: (c isLetter or: [c == $: or: [c == $_ and: [self allowUnderscoreSelectors]]]).
- 	self failUnless: (c isLetter or: [c == $:]).
  	start := sourcePosition.	
  	[c := self nextChar.
+ 	c isAlphaNumeric or: [c == $: or: [c == $_ and: [self allowUnderscoreSelectors]]]] whileTrue.
- 	c isAlphaNumeric or: [c == $:]] 
- 		whileTrue: [].
  	end := sourcePosition - 1.
  	c := source copyFrom: start - 1 to: end.
  	self scanPast: #symbol start: start - 1 end: end.
  	^c!