[Pkg] The Trunk: XML-Parser-nice.22.mcz

[commits at source.squeak.org]

Nicolas Cellier uploaded a new version of XML-Parser to project The Trunk:
http://source.squeak.org/trunk/XML-Parser-nice.22.mcz

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

Name: XML-Parser-nice.22
Author: nice
Time: 27 December 2009, 1:01:16 am
UUID: d0589584-803d-4fc0-b9e7-add2d816a761
Ancestors: XML-Parser-nice.21

Cosmetic: move or remove a few temps inside closures

=============== Diff against XML-Parser-nice.21 ===============

Item was changed:
  ----- Method: XMLTokenizer>>streamEncoding: (in category 'streaming') -----
  streamEncoding: encodingString
  
- 	| converterClass |
  	Smalltalk at: #TextConverter ifPresent: [:tc | 
  		(stream respondsTo: #converter:) ifTrue: [
+ 			| converterClass |
  			converterClass := tc defaultConverterClassForEncoding: encodingString asLowercase.
  			converterClass ifNotNil: [stream converter: converterClass new]]]!

Item was changed:
  ----- Method: XMLNode>>firstTagNamed:with: (in category 'searching') -----
  firstTagNamed: aSymbol with: aBlock
  	"Return the first encountered node with the specified tag that
  	allows the block to evaluate to true. Pass the message on"
  
- 	| answer |
- 
  	self elementsDo: [:node |
+ 		| answer |
  		(answer := node firstTagNamed: aSymbol with: aBlock) ifNotNil: [^answer]].
  	^nil!

Item was changed:
  ----- Method: XMLNode>>firstTagNamed: (in category 'searching') -----
  firstTagNamed: aSymbol 
  	"Return the first encountered node with the specified tag. Pass the message on"
  
+ 	self elementsDo: [:node |
+ 		| answer |
+ 		(answer := node firstTagNamed: aSymbol) ifNotNil: [^answer]].
- 	| answer |
- 
- 	self elementsDo: [:node | (answer := node firstTagNamed: aSymbol) ifNotNil: [^answer]].
  	^nil!