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

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

Name: Sake-Core-kph.99
Author: kph
Time: 13 February 2009, 2:36:42 am
UUID: 63049ea3-01ac-4bc2-820f-b26cc81d440b
Ancestors: Sake-Core-kph.98

print and stor, send value to their values

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

Item was changed:
  ----- Method: SakeMeta>>printOn: (in category 'printing') -----
  printOn: aStream
  
  	"writes metadata in a user readable format"
  
  	self withIndexDo: [ :value :key | 
  			aStream
  				nextPutAll: key;
  				nextPutAll: ': ';
+ 				nextPutAll: value asString;
- 				nextPutAll: value;
  				cr]
  !

Item was changed:
  ----- Method: SakeMeta>>storeOn: (in category 'printing') -----
  storeOn: aStream
  
  	"writes metadata in a user readable format"
  
  	| noneYet |
  	aStream nextPutAll: '('.
  	aStream nextPutAll: self class name.
  	aStream nextPutAll: ' new'; cr.
  	noneYet := true.
  	self withIndexDo: [ :value :key | 
  			noneYet
  				ifTrue: [noneYet := false]
  				ifFalse: [aStream nextPut: $;; cr].
  			aStream nextPutAll: ' at: '.
  			aStream store: key.
  			aStream nextPutAll: ' put: '.
+ 			aStream store: value asString.
- 			aStream store: value.
  			].
  	noneYet ifFalse: [aStream nextPut: $;; cr; nextPutAll: 'yourself'].
  	aStream nextPut: $)!

Item was changed:
+ ----- Method: SakeTask class>>cleanUp (in category 'clean up') -----
- ----- Method: SakeTask class>>cleanUp (in category 'as yet unclassified') -----
  cleanUp
  
  	status := nil!