[Pkg] Tasks: Tasks-Squeak310-kph.18.mcz

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

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

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

Name: Tasks-Squeak310-kph.18
Author: kph
Time: 8 December 2008, 4:59:38 am
UUID: 25069ad7-39f3-4643-ba42-ebed64a80b02
Ancestors: Tasks-Squeak310-kph.17

.

=============== Diff against Tasks-Squeak310-kph.17 ===============

Item was added:
+ ----- Method: ReleaseAfterSqueak310 class>>versionStatus (in category 'as yet unclassified') -----
+ versionStatus
+ 
+ 	^ 'prealpha'!

Item was changed:
  ----- Method: ReleaseAfterSqueak310 class>>taskReorganizePackages (in category 'as yet unclassified') -----
  taskReorganizePackages
  	^ self define: [ :task |
  				
  		task action: [ 
  
    
   (MCPackage named: 'Kernel') workingCopy package name: 'Kernel.impl'.
   (MCPackage named: 'KernelTests') workingCopy package name: 'Kernel.test'.
   (MCPackage named: 'Collections') workingCopy package name: 'Collections.impl'.
   (MCPackage named: 'CollectionsTests') workingCopy package name: 'Collections.test'.
   (MCPackage named: 'Graphics') workingCopy package name: 'Graphics.impl'.
   (MCPackage named: 'GraphicsTests') workingCopy package name: 'Graphics.test'.
   (MCPackage named: 'Morphic') workingCopy package name: 'Morphic.impl'.
   (MCPackage named: 'MorphicTests') workingCopy package name: 'Morphic.test'.
   (MCPackage named: 'Network') workingCopy package name: 'Network.impl'.
   (MCPackage named: 'NetworkTests') workingCopy package name: 'Network.test'.
    
   (MCPackage named: 'Exceptions') workingCopy package name: 'Exceptions.impl'.
   (MCPackage named: 'Exceptions.test') workingCopy.
   (MCPackage named: 'Files') workingCopy package name: 'Files.impl'.
   (MCPackage named: 'Files.test') workingCopy.
   (MCPackage named: 'Files') workingCopy package name: 'Files.impl'.
   (MCPackage named: 'Files.test') workingCopy.
   (MCPackage named: 'ST80') workingCopy package name: 'ST80.impl'.
   (MCPackage named: 'ST80.test') workingCopy.
   (MCPackage named: 'Compiler') workingCopy package name: 'Compiler.impl'.
   (MCPackage named: 'Compiler.test') workingCopy.
   (MCPackage named: 'System') workingCopy package name: 'System.impl'.
   (MCPackage named: 'System.test') workingCopy.
   (MCPackage named: 'Tools') workingCopy package name: 'Tools.impl'.
   (MCPackage named: 'Tools.test') workingCopy.
   (MCPackage named: 'Traits') workingCopy package name: 'Traits.impl'.
   (MCPackage named: 'Traits.test') workingCopy.
+ 
+  "pull outs"
+  (MCPackage named: 'Kernel-Tracer') workingCopy.
    MCWorkingCopy registry rehash.  
  		
  		]
  	].!

Item was added:
+ ----- Method: Release310 class>>doClean (in category '10') -----
+ doClean
+ 
+ 	^ SakeTask define: [ :task |
+ 
+ 		task dependsOn: {
+ 		
+ 			 self removeRedundantMethods.
+ 			 (Packages current named: 'Universes') unload.
+ 			 
+ 		}
+ 		
+ 	].
+  !

Item was added:
+ ----- Method: ReleaseAfterSqueak310 class>>repository (in category 'as yet unclassified') -----
+ repository
+ 
+ 	^ MCHttpRepository
+ 				location: 'http://www.squeaksource.com/311'
+ 				user: ''
+ 				password: ''.
+ 	
+ !

Item was added:
+ ----- Method: Release310 class>>removeRedundantMethods (in category '10') -----
+ removeRedundantMethods
+ 
+ 	^ SakeTask define: [ :task |
+ 
+ 		task dependsOn: {
+ 		
+ 			"Discards should be tasks and shouldnt clutter up SystemDictionary"	
+ 
+ 			(SakeTask class: 'SystemDictionary') removeSelectorsMatching: 'discard*'.	
+ 				
+ 			"makeing a release is a task and shouldnt clutter up SystemDictionary"	
+ 				
+ 			(SakeTask class: 'SystemDictionary') removeSelectors: #( #lastRemoval #majorShrink  #zapMVCprojects.
+ 		  #makeExternalRelease  #makeInternalRelease #zapMVCprojects #zapMVCprojects ).
+  					
+ 			"replaced with the more useful: Smalltalk globals explore"		
+ 			(SakeTask class: 'SystemDictionary') removeSelector: #inspectGlobals.
+ 			
+ 			(SakeTask class: 'ReleaseBuilder') removeSelector: #fixObsoleteReferences.
+  			(SakeTask class: 'ScriptLoader') removeSelector: #fixObsoleteReferences.
+ 			
+ 		}.
+ 		task info doc:
+ 			
+ 'SystemDictionary #inspectGlobals was including traits.
+ removed method. (Replace with SystemDictionary #globals from kernel-extensions)'
+ 
+ 		
+ 	].!

Item was added:
+ ----- Method: Release310 class>>bugsFoundOrFixed (in category '10') -----
+ bugsFoundOrFixed
+ 
+ "
+ SystemDictionary inspectGlobals was showing traits.
+ removed and replace with #globals
+ 
+ "
+ !

Item was added:
+ ----- Method: ReleaseAfterSqueak310 class>>taskTidyRepositories (in category 'as yet unclassified') -----
+ taskTidyRepositories
+ 
+ 	^ self define: [ :task |
+ 		
+ 		MCWorkingCopy allManagers do: [ :ea | ea repository ifNotNil: [ ea repositoryGroup initialize; addRepository: ea repository ] ]
+ 		
+ 	]!

Item was added:
+ ----- Method: ReleaseAfterSqueak310 class>>taskTESTCANDIDATE (in category 'as yet unclassified') -----
+ taskTESTCANDIDATE
+ 	^ self define: [ :task |
+ 			
+ 		task author: 'auto'.
+ 		
+ 		task action: {
+ 			(SakeTask class: self class) removeSelectorsMatching: '*'.
+ 	
+ 			self taskTidyWorld.
+ 			self taskTidyMorphs.
+ 			self taskTidyRepositories.
+ 			
+ 			self taskSetPreferences. 
+ 			self taskPackageUpgrades.
+ 			self taskKernelIImports.
+ 
+ 			self taskBugFixes.
+ 			self taskDocumentFixes.	 
+ 
+ 			self taskReorganizeCategories.
+   			self taskReorganizePackages.
+ 
+ 			self taskCleanDeprecated.
+ 			self taskCleanMiscellaneous.
+ 			self taskMarkNewlyDeprecated.
+ 			
+ 			self taskCleanExcess.
+ 			self taskCleanUp.
+ 			
+ 			self taskFinalize.			 
+ 		}.
+ 		 
+ 	].
+ !

Item was added:
+ TasksRelease subclass: #Release310
+ 	instanceVariableNames: ''
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'Tasks-Squeak310'!

Item was added:
+ ----- Method: Release310 class>>removePackages (in category '10') -----
+ removePackages
+ 
+ 	^ SakeTask define: [ :task |
+ 
+ 		task dependsOn: {}.
+ 		
+ 		task action: {
+ 			[ Installer unload: 'OB-Standard.39' ].
+ 			[ Installer unload: 'OB-Standard.39' ].
+ 		
+ 		
+ 		}
+ 		 
+ 		
+ 	].!

Item was added:
+ ----- Method: Release310 class>>removeDeprecatedMethods (in category '10') -----
+ removeDeprecatedMethods 
+ 
+ 	^ SakeTask define: [ :task |
+ 
+ 		task action: [ 
+ 		
+ 				(SystemNavigation default allCallsOn: #deprecated:)  
+ 				do: [ :mr | mr remove ]. 
+ 		
+ 		]			
+ 	].
+ 
+ "
+ SequencableCollection #upTo: is marked deprecated, but has users
+ 
+ (TheWorldMenu class >> #loadSqueakMap) browse.
+ (KedamaSetColorComponentTile >> #addPatchTile) browse.
+ (SMSqueakMap >> #pingServer: ) browse.
+ Lexicon browse. 'has several senders'
+ StringMorph >> #balloonTextForLexiconString
+ "!

Item was changed:
  ----- Method: ReleaseAfterSqueak310kph class>>suffix (in category 'as yet unclassified') -----
  suffix
  
+ 	^ super suffix , '-kph'!
- ^ 'kph'!

Item was changed:
  ----- Method: ReleaseAfterSqueak310 class>>taskGenerate (in category 'as yet unclassified') -----
  taskGenerate 
+ 	self deprecated: 'use taskTESTCANDIDATE'.
+ 	^ self taskTESTCANDIDATE!
- 	^ self taskMAIN!

Item was removed:
- ----- Method: ReleaseAfterSqueak310 class>>taskMAIN (in category 'as yet unclassified') -----
- taskMAIN
- 	^ self define: [ :task |
- 			
- 		task author: 'auto'.
- 		
- 		task action: {
- 			(SakeTask class: self class) removeSelectorsMatching: '*'.
- 	
- 			self taskTidyWorld.
- 			self taskTidyMorphs.
- 			
- 			self taskSetPreferences. 
- 			self taskPackageUpgrades.
- 			self taskKernelIImports.
- 
- 			self taskBugFixes.
- 			self taskDocumentFixes.	 
- 
- 			self taskReorganizeCategories.
-   			self taskReorganizePackages.
- 
- 			self taskCleanDeprecated.
- 			self taskCleanMiscellaneous.
- 			self taskMarkNewlyDeprecated.
- 			
- 			self taskCleanExcess.
- 			self taskCleanUp.
- 			
- 			self taskFinalize.
- 			 
- 		}.
- 		 
- 	].
- !

Item was removed:
- ----- Method: CleanSqueak310 class>>removeRedundantMethods (in category '10') -----
- removeRedundantMethods
- 
- 	^ SakeTask define: [ :task |
- 
- 		task dependsOn: {
- 		
- 			"Discards should be tasks and shouldnt clutter up SystemDictionary"	
- 
- 			(SakeTask class: 'SystemDictionary') removeSelectorsMatching: 'discard*'.	
- 				
- 			"makeing a release is a task and shouldnt clutter up SystemDictionary"	
- 				
- 			(SakeTask class: 'SystemDictionary') removeSelectors: #( #lastRemoval #majorShrink  #zapMVCprojects.
- 		  #makeExternalRelease  #makeInternalRelease #zapMVCprojects #zapMVCprojects ).
-  					
- 			"replaced with the more useful: Smalltalk globals explore"		
- 			(SakeTask class: 'SystemDictionary') removeSelector: #inspectGlobals.
- 			
- 			(SakeTask class: 'ReleaseBuilder') removeSelector: #fixObsoleteReferences.
-  			(SakeTask class: 'ScriptLoader') removeSelector: #fixObsoleteReferences.
- 			
- 		}.
- 		task info doc:
- 			
- 'SystemDictionary #inspectGlobals was including traits.
- removed method. (Replace with SystemDictionary #globals from kernel-extensions)'
- 
- 		
- 	].!

Item was removed:
- ----- Method: CleanSqueak310 class>>removePackages (in category '10') -----
- removePackages
- 
- 	^ SakeTask define: [ :task |
- 
- 		task dependsOn: {}.
- 		
- 		task action: {
- 			[ Installer unload: 'OB-Standard.39' ].
- 			[ Installer unload: 'OB-Standard.39' ].
- 		
- 		
- 		}
- 		 
- 		
- 	].!

Item was removed:
- ----- Method: CleanSqueak310 class>>bugsFoundOrFixed (in category '10') -----
- bugsFoundOrFixed
- 
- "
- SystemDictionary inspectGlobals was showing traits.
- removed and replace with #globals
- 
- "
- !

Item was removed:
- ----- Method: CleanSqueak310 class>>removeDeprecatedMethods (in category '10') -----
- removeDeprecatedMethods 
- 
- 	^ SakeTask define: [ :task |
- 
- 		task action: [ 
- 		
- 				(SystemNavigation default allCallsOn: #deprecated:)  
- 				do: [ :mr | mr remove ]. 
- 		
- 		]			
- 	].
- 
- "
- SequencableCollection #upTo: is marked deprecated, but has users
- 
- (TheWorldMenu class >> #loadSqueakMap) browse.
- (KedamaSetColorComponentTile >> #addPatchTile) browse.
- (SMSqueakMap >> #pingServer: ) browse.
- Lexicon browse. 'has several senders'
- StringMorph >> #balloonTextForLexiconString
- "!

Item was removed:
- TasksClean subclass: #CleanSqueak310
- 	instanceVariableNames: ''
- 	classVariableNames: ''
- 	poolDictionaries: ''
- 	category: 'Tasks-Squeak310'!

Item was removed:
- ----- Method: CleanSqueak310 class>>doClean (in category '10') -----
- doClean
- 
- 	^ SakeTask define: [ :task |
- 
- 		task dependsOn: {
- 		
- 			 self removeRedundantMethods.
- 			 (Packages current named: 'Universes') unload.
- 			 
- 		}
- 		
- 	].
-  !