[Pkg] Packages: Sake-Packages-kph.32.mcz

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

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

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

Name: Sake-Packages-kph.32
Author: kph
Time: 12 March 2009, 10:49:19 pm
UUID: 07181ec5-0f58-11de-987b-000a95edb42a
Ancestors: Sake-Packages-kph.31

removed ifNotNil: to monadic block for wider compatability.

=============== Diff against Sake-Packages-kph.31 ===============

Item was changed:
  ----- Method: Packages class>>upgradeTasks (in category 'public') -----
  upgradeTasks
+ 	| list task |
- 	| list |
  	Packages update.
  	
  	list := Set new.
  	
+ 	self provided keysAndValuesDo: [ :k :v | 
+ 		
+ 		task := (Smalltalk classNamed: (v at: #class)) findNamed: k.
+ 		
+ 		task ifNotNil: [ list add: task ] 
+ 		
+ 	].
- 	self provided keysAndValuesDo: [ :k :v |  ((Smalltalk classNamed: (v at: #class)) findNamed: k) ifNotNil: [ :t | list add: t ] ].
  	
  	^ list asTask!