A new version of Sake-Core was added to project Sake : http://www.squeaksource.com/Sake/Sake-Core-kph.107.mcz
==================== Summary ====================
Name: Sake-Core-kph.107 Author: kph Time: 1 July 2009, 3:47:16 pm UUID: 57f5752c-5dce-43bc-b24a-5a51cc4834a4 Ancestors: Sake-Core-kph.106
+ addAction:
adds to the default action (if none defined)
=============== Diff against Sake-Core-kph.106 ===============
Item was changed: ----- Method: SakeBlock class>>signalTask: (in category 'as yet unclassified') ----- signalTask: aTask
^ self new tag: aTask; + signal: (aTask printString, ' blocked ').! - signal!
Item was changed: ----- Method: SakeTask>>addAction: (in category 'as yet unclassified') ----- addAction: anAction actionBlock isBlock ifTrue: [ actionBlock := OrderedCollection with: actionBlock ]. + actionBlock ifNil: [ actionBlock := OrderedCollection with: self defaultAction ]. + - actionBlock add: anAction. !