[Pkg] Tasks: Tasks-Common-kph.55.mcz

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

A new version of Tasks-Common was added to project Tasks:
http://www.squeaksource.com/Tasks/Tasks-Common-kph.55.mcz

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

Name: Tasks-Common-kph.55
Author: kph
Time: 26 February 2009, 1:57:17 pm
UUID: 612d8cbc-040d-11de-a647-000a95edb42a
Ancestors: Tasks-Common-kph.54

taskFinalize is now handled by Bob script elements

=============== Diff against Tasks-Common-kph.54 ===============

Item was changed:
  ----- Method: TasksRelease class>>taskCleanUp (in category 'as yet unclassified') -----
  taskCleanUp
  
  	^  [
- 				SmalltalkImage current cleanUpAll.
  				"(Object classPool at: #DependentsFields) size > 1 ifTrue: [self error:'Still have dependents']."
  				Smalltalk at: #Browser ifPresent:[:br| br initialize].
  				Project allSubInstancesDo:[:prj| prj == Project current ifFalse:[Project deletingProject: prj]].
  		 ]
  	!

Item was removed:
- ----- Method: TasksRelease class>>buildDateStampString (in category 'as yet unclassified') -----
- buildDateStampString
-  
- 	^ self buildDateStamp printYYMMDDHHSS: '-'. 
- 	
- 	!

Item was removed:
- ----- Method: TasksRelease class>>inalize (in category 'as yet unclassified') -----
- inalize
- 
- 	^ self finalize: self suffix, self suffixStatus!

Item was removed:
- ----- Method: TasksRelease class>>buildDateStamp (in category 'as yet unclassified') -----
- buildDateStamp
-  
- 	^ self status at: #date ifAbsent:[ self error: 'buildStampNow has never been called']
- 	
- !

Item was removed:
- ----- Method: TasksRelease class>>taskCleanUpAndSaveAs: (in category 'as yet unclassified') -----
- taskCleanUpAndSaveAs: filename
- 
- 	^ self define: [ :task |
- 		task action: [	
- 			SmalltalkImage current cleanUpAllExcept: #(ChangeSet).
- 			task author: '' during: [
- 				SmalltalkImage current saveAs: filename.
- 			].
- 		]
- 	].!

Item was removed:
- ----- Method: TasksRelease class>>buildStampNow (in category 'as yet unclassified') -----
- buildStampNow
-  
- 	^ self status at: #date put: DateAndTime now 
- 	
- !

Item was removed:
- ----- Method: TasksRelease class>>taskGoGolden (in category 'as yet unclassified') -----
- taskGoGolden
- 
- 	^ self taskFinalize: '-basic'; defined
- !