[Pkg] The Trunk: Collections-nice.552.mcz

[commits at source.squeak.org]

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

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

Name: Collections-nice.552
Author: nice
Time: 16 December 2013, 3:54:57.309 pm
UUID: 18bb4a8d-6d47-46b3-ad6f-7514b1e5da7a
Ancestors: Collections-ul.551

Use non logging Compiler protocol rather than providing a logged: false argument.

=============== Diff against Collections-ul.551 ===============

Item was changed:
  ----- Method: TextDoIt>>actOnClickFor: (in category 'as yet unclassified') -----
  actOnClickFor: anObject
  	"Note: evalString gets evaluated IN THE CONTEXT OF anObject
  	 -- meaning that self and all instVars are accessible"
+ 	Compiler evaluate: evalString for: anObject.
- 	Compiler evaluate: evalString for: anObject logged: false.
  	^ true !

Item was changed:
  ----- Method: TextPrintIt>>actOnClickFor:in:at:editor: (in category 'as yet unclassified') -----
  actOnClickFor: anObject in: aParagraph at: clickPoint editor: editor
  	"Note: evalString gets evaluated IN THE CONTEXT OF anObject
  	 -- meaning that self and all instVars are accessible"
  	| result range index |
+ 	result := Compiler evaluate: evalString for: anObject.
- 	result := Compiler evaluate: evalString for: anObject logged: false.
  	result := ' ', result printString,' '.
  	"figure out where the attribute ends in aParagraph"
  	index := (aParagraph characterBlockAtPoint: clickPoint) stringIndex.
  	range := aParagraph text rangeOf: self startingAt: index.
  	editor selectFrom: range last+1 to: range last.
  	editor zapSelectionWith: result.
  	editor selectFrom: range last to: range last + result size.
  	^ true !