[Pkg] Sake : Sake-Core-kph.72.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.72.mcz

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

Name: Sake-Core-kph.72
Author: kph
Time: 9 December 2008, 2:28:23 am
UUID: 363cc069-adf7-45fe-8dab-26d04346affe
Ancestors: Sake-Core-kph.71

+ fix for if action is ever nil.
+ make =/hash cusomizable via hashParts

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

Item was changed:
  ----- Method: SakeTask>>tasksFromList: (in category 'as yet unclassified') -----
  tasksFromList: list
   			 
+ 	^ (list ifNil: [ ^ #()]) collect: [ :task | (self taskFrom: task) withExtensions ]
- 	^ (list collect: [ :task | (self taskFrom: task) withExtensions ])
  	 
  	 !

Item was changed:
  ----- Method: SakeClassTask class>>category:classes: (in category 'as yet unclassified') -----
  category: aCategory classes: classes
  
  	| c |
  	
+ 	c := classes isSymbol ifTrue: [ Array with: classes ] ifFalse: [ classes ].
- 	c := classes isSymbol ifTrue: [ Array with: classes ] ifFalse: [ c ].
  	 
  	^ self dependingOn: (c collect: [ :ea | (self class: ea) setCategory: aCategory ])!

Item was added:
+ ----- Method: SakeTask>>key (in category 'as yet unclassified') -----
+ key
+ 
+ 	^ args
+ 
+ !

Item was added:
+ ----- Method: SakeTask>>hashParts (in category 'as yet unclassified') -----
+ hashParts
+ 
+ 	^ { context receiver class. context selector. args }
+ 	
+  !

Item was changed:
  ----- Method: SakeTask>>hash (in category 'as yet unclassified') -----
  hash
  
+ 	^ self hashParts hash!
- 	^  (context receiver class hash bitXor: context selector hash) bitXor: args hash!

Item was changed:
  ----- Method: SakeTask>>= (in category 'as yet unclassified') -----
  = other 
+ 	^  self hashParts = other hashParts!
- 	^ (((self class = other class) and: [ context receiver class = other context receiver class ]) and: [ context selector = other context selector ]) and: [ args = other args ]!