A new version of Sake-Core was added to project Sake : http://www.squeaksource.com/Sake/Sake-Core-kph.67.mcz
==================== Summary ====================
Name: Sake-Core-kph.67 Author: kph Time: 23 November 2008, 5:59:14 pm UUID: afa45f22-7345-4f6d-943b-d9688b87553b Ancestors: Sake-Core-kph.66
fix
=============== Diff against Sake-Core-kph.66 ===============
Item was changed: ----- Method: SakeTask class>>dir: (in category 'as yet unclassified') ----- + dir: aDirectoryAble - dir: aRioable ^ self define: [ :task | + task target: aDirectoryAble asDirectory. - task target: aRioable asRio. task if: [ task target exists not ]. task action: [ task target mkpath ]. ] !
Item was changed: ----- Method: SakeTask>>privateRunRakeOrdering: (in category 'as yet unclassified') ----- privateRunRakeOrdering: setOfTasks
"this is the way that Rake orders tasks, doesnt seem right to me" "we ensure that we obtain the task to run from the overall set of tasks" | priorTasks | self hasRun ifTrue: [ ^ result ]. hasRun := true. priorTasks := self dependsOn collect: [ :prior | setOfTasks like: (self taskFrom: prior) ]. priorTasks collect: [ :each | + each ifNotNil: [ each runLevel: runLevel. + each privateRunRakeOrdering: setOfTasks ]]. - each runLevel: runLevel. - each privateRunRakeOrdering: setOfTasks ]. (self isNeeded: priorTasks) ifTrue: [ self trace. self doAction: priorTasks. ^ result. ]. ^ false !
Item was changed: ----- Method: SakeTask class>>file: (in category 'as yet unclassified') ----- + file: aFileAble - file: aRioable
^ self define: [ :task | + task target: aFileAble asFile. - task target: aRioable asRio. task if: [ :prerequisites | task target exists not or: [ prerequisites anySatisfy: [ :each | each target mTime > self target mTime ]] ]. task action: [ task target ] ].!
packages@lists.squeakfoundation.org