[Pkg] Sake : Sake-Core-kph.89.mcz

[squeak-dev-noreply at lists.squeakfoundation.org]

A new version of Sake-Core was added to project Sake :
http://www.squeaksource.com/Sake/Sake-Core-kph.89.mcz

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

Name: Sake-Core-kph.89
Author: kph
Time: 14 December 2008, 2:10:08 am
UUID: 9d82e81f-c35b-4231-9a68-635a37de0830
Ancestors: Sake-Core-kph.88

use author:during: instead of setAuthorDuring:

=============== Diff against Sake-Core-kph.88 ===============

Item was changed:
  ----- Method: SakeTask>>author:during: (in category 'as yet unclassified') -----
  author: initials during: aBlock
  
  	| tmp |
  	
  	[ 	
  		tmp := Utilities authorInitialsPerSe.
+ 		Utilities setAuthorInitials: initials.
- 		Utilities setAuthorInitials: author.
  		aBlock value.
  
  	] ensure: [ Utilities setAuthorInitials: tmp ]
  	
  	!

Item was changed:
  ----- Method: SakeTask>>doAction: (in category 'as yet unclassified') -----
  doAction: priorTasks
  
   
  	Count := 0. "reset loop trap"
  		
  	self doActionStep.
  	
  	result := nil.
  	
  	self action isBlock ifTrue: [ 
  		
+ 		result := self author: author during: [ self action valueWithPossibleArgument: priorTasks ].
- 		result := self setAuthorDuring: [ self action valueWithPossibleArgument: priorTasks ].
  		
  	].
  	
  	(self action isKindOf: Collection) ifTrue: [ self doTasks: self action ].
  
  	self doActionEnd.
  	
  !

Item was removed:
- ----- Method: SakeTask>>setAuthorDuring: (in category 'as yet unclassified') -----
- setAuthorDuring: aBlock
- 
- 	| tmp |
- 
- 	author ifNil: [ ^ aBlock value ].
- 	
- 	[ 	
- 		tmp := Utilities authorInitialsPerSe.
- 		Utilities setAuthorInitials: author.
- 		^ aBlock value.
- 
- 	] ensure: [ Utilities setAuthorInitials: tmp ]
- 	
- 	!