The Trunk: System-nice.376.mcz

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

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

Name: System-nice.376
Author: nice
Time: 21 September 2010, 10:38:25.83 am
UUID: ef90228d-1ac7-e74c-b376-30730abe8088
Ancestors: System-ul.375

minor ActionSequence/EventManager refactoring using #inject:into: and #ifNil:

=============== Diff against System-ul.375 ===============

Item was changed:
  ----- Method: ActionSequence>>value (in category 'evaluating') -----
  value
+ "Evaluate the elements of the receiver and answer the result of last evaluation."
-     "Answer the result of evaluating the elements of the receiver."
 
+ ^self inject: nil into:
+ [:previousAnswer :each | each value]!
-     | answer |
-     self do:
-         [:each |
-         answer := each value].
-     ^answer!

Item was changed:
  ----- Method: ActionSequence>>valueWithArguments: (in category 'evaluating') -----
  valueWithArguments: anArray
+ "Evaluate the elements of the receiver with provided arguments and answer the result of last evaluation."
 
+ ^self inject: nil into:
+ [:previousAnswer :each | each valueWithArguments: anArray]!
-     | answer |
-     self do:
-         [:each |
-         answer := each valueWithArguments: anArray].
-     ^answer!

Item was changed:
  ----- Method: EventManager>>updateableActionMap (in category 'accessing') -----
  updateableActionMap
+ ^actionMap ifNil:
+ [actionMap := self createActionMap]!
-
-     actionMap == nil
-         ifTrue: [actionMap := self createActionMap].
-     ^actionMap!