[Pkg] Installer: Installer-Core-mtf.326.mcz

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

A new version of Installer-Core was added to project Installer:
http://www.squeaksource.com/Installer/Installer-Core-mtf.326.mcz

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

Name: Installer-Core-mtf.326
Author: mtf
Time: 3 February 2010, 11:41:41 pm
UUID: dc784d97-aead-42aa-a7cf-b8df06e2f548
Ancestors: Installer-Core-kph.325, Installer-Core-DamienCassou.325

merged latest two versions

=============== Diff against Installer-Core-kph.325 ===============

Item was changed:
  ----- Method: Installer>>installMCcs:from: (in category 'mantis') -----
  installMCcs: aFileName from: stream 
  
  	| reader |
  	
+ 	reader := Smalltalk at: #MCCsReader ifPresent: [:class | class on: stream].!
- 	reader := MCCsReader on: stream.!

Item was changed:
  ----- Method: InstallerCruft>>createRBforBug: (in category 'mantis') -----
  createRBforBug: aBugNo 
  	| aStream  fileList selFile aFileName |
  
  	self setBug: aBugNo.
  fileList := self maFiles keys asOrderedCollection.
  fileList  addLast: 'none'.
+ (Smalltalk classNamed: #ReleaseBuilderFor3dot10) clear.
- ReleaseBuilderFor3dot10 clear.
  [selFile := UIManager default chooseFrom: fileList title: 'Choose what files load '.
  selFile = fileList size ifFalse:[
  aFileName := fileList at: selFile.
  	self logCR: 'obtaining ', aFileName, '...'.
  
  	aStream := self maStreamForFile: aFileName .
+ 	(Smalltalk classNamed: #ReleaseBuilderFor3dot10) current packagesInfluenced: aStream named: aFileName.
- 	ReleaseBuilderFor3dot10 current packagesInfluenced: aStream named: aFileName.
  	
  	self installCS: aFileName from: aStream].selFile = fileList size]whileFalse.
  	
+ 	(Smalltalk classNamed: #ReleaseBuilderFor3dot10) current newUpdateFor: aBugNo
- 	ReleaseBuilderFor3dot10 current newUpdateFor: aBugNo
  	
  	
  	!

Item was removed:
- ----- Method: InstallerCruft>>user: (in category 'accessing') -----
- user: anObject
- 
- 	user := anObject!

Item was removed:
- ----- Method: InstallerCruft>>user (in category 'accessing') -----
- user
- 
- 	^ user ifNil: [ '' ]!