[Pkg] Installer: Installer-Core-kph.269.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-kph.269.mcz

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

Name: Installer-Core-kph.269
Author: kph
Time: 10 December 2008, 1:50:06 pm
UUID: 646f7c3b-1d95-47f1-aac4-18a8e8682853
Ancestors: Installer-Core-kph.268

added #ensureFix and #fixBug

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

Item was changed:
  ----- Method: InstallerMantis>>fixBug:date: (in category 'public interface') -----
  fixBug: aBugNo date: aDate
  
  	self setBug: aBugNo.
+  	self date: aDate.
+ 	self fixBug.
-  	self install: self maUrl from: self maScript.
- 	self maCheckDateAgainst: aDate.
- 		
- 	self fixesAppliedNumbers in: [ :fixed |
- 		(fixed isEmpty or: [ (fixed includes: aBugNo asInteger) not]) 
- 		ifTrue: [ self fixesApplied add: aBugNo ]].
- 
  	
- 	
  !

Item was changed:
  ----- Method: InstallerMantis>>ensureFix: (in category 'public interface') -----
  ensureFix: aBugNo
  
+ 	^self ensureFix: aBugNo date: nil!
- 	| fixesAppliedNumbers |
- 	self setBug: aBugNo.
- 	fixesAppliedNumbers := self fixesApplied collect: [ :fixDesc | fixDesc asInteger ].
- 	(fixesAppliedNumbers includes: bug) ifFalse: [ self fixBug: aBugNo ]!

Item was added:
+ ----- Method: InstallerMantis>>ensureFix:date: (in category 'public interface') -----
+ ensureFix: aBugNo date: aDate
+ 
+ 	self setBug: aBugNo.
+ 	self date: aDate..
+ 	
+ 	self ensureFix.!

Item was added:
+ ----- Method: InstallerMantis>>ensureFix (in category 'public interface') -----
+ ensureFix
+ 
+ 	| fixesAppliedNumbers |
+ 	
+ 	fixesAppliedNumbers := self fixesApplied collect: [ :fixDesc | fixDesc asInteger ].
+ 	(fixesAppliedNumbers includes: bug) ifFalse: [ self fixBug ]!

Item was changed:
  ----- Method: InstallerMantis>>fixBug: (in category 'public interface') -----
+ fixBug: aBugNo 
- fixBug: aBugNo
  
+ 	^ self fixBug: aBugNo date: nil.
+ 	
+ !
- 	^ self fixBug: aBugNo date: nil!

Item was changed:
  ----- Method: InstallerMantis>>ensureFixes: (in category 'public interface') -----
  ensureFixes: aBugNos
  
+ 	aBugNos do: [ :bugNo | self ensureFix: bugNo ].!
- 	aBugNos do: [ :bugNo | self ensureFixes: bugNo ].!

Item was added:
+ ----- Method: InstallerMantis>>fixBug (in category 'public interface') -----
+ fixBug
+ 
+  	self install: self maUrl from: self maScript.
+ 	self maCheckDateAgainst: date.
+ 		
+ 	self fixesAppliedNumbers in: [ :fixed |
+ 		(fixed isEmpty or: [ (fixed includes: bug asInteger) not]) 
+ 		ifTrue: [ self fixesApplied add: bug ]].
+ 
+ 	
+ 	
+ !