Levente Uzonyi uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-ul.125.mcz
==================== Summary ====================
Name: Tests-ul.125 Author: ul Time: 26 April 2011, 5:30:22.768 am UUID: 13f774fc-876e-2d44-b440-893682808fa5 Ancestors: Tests-nice.124
Ensure that snapshots created by Monticello's tests are removed from the package cache.
=============== Diff against Tests-nice.124 ===============
Item was changed: ----- Method: MCChangeNotificationTest>>tearDown (in category 'running') ----- tearDown + + super tearDown. workingCopy unregister!
Item was changed: ----- Method: MCClassDefinitionTest>>tearDown (in category 'as yet unclassified') ----- tearDown + + super tearDown. Smalltalk at: 'MCMockClassC' ifPresent: [:c | c removeFromSystem]!
Item was changed: ----- Method: MCDirectoryRepositoryTest>>tearDown (in category 'as yet unclassified') ----- tearDown + + super tearDown. self directory recursiveDelete!
Item was changed: ----- Method: MCFileInTest>>tearDown (in category 'running') ----- tearDown + + super tearDown. (diff isNil or: [diff isEmpty not]) ifTrue: [expected updatePackage: self mockPackage]!
Item was changed: ----- Method: MCInitializationTest>>tearDown (in category 'as yet unclassified') ----- tearDown + + super tearDown. (MCWorkingCopy forPackage: self mockPackage) unregister!
Item was changed: ----- Method: MCMczInstallerTest>>tearDown (in category 'as yet unclassified') ----- tearDown + + super tearDown. expected snapshot updatePackage: self mockPackage. self deleteFile.!
Item was changed: ----- Method: MCMethodDefinitionTest>>tearDown (in category 'running') ----- tearDown + + super tearDown. self restoreMocks. (MCWorkingCopy forPackage: (MCPackage named: 'FooBarBaz')) unregister. self class compile: 'override ^ 1' classified: 'mocks'. self ownPackage modified: isModified. !
Item was changed: ----- Method: MCPackageTest>>tearDown (in category 'running') ----- tearDown + + super tearDown. self mockSnapshot install!
Item was changed: ----- Method: MCPatchTest>>tearDown (in category 'as yet unclassified') ----- tearDown + + super tearDown. self restoreMocks!
Item was added: + ----- Method: MCTestCase>>clearPackageCache (in category 'running') ----- + clearPackageCache + "Remove all mock packages created during the tests from the package cache." + + | directory | + directory := MCCacheRepository default directory. + (directory fileNamesMatching: self mockVersionName, '*') do: [ :each | + directory deleteFileNamed: each ]!
Item was added: + ----- Method: MCTestCase>>tearDown (in category 'running') ----- + tearDown + + self clearPackageCache!
Item was changed: ----- Method: MCWorkingCopyTest>>clearPackageCache (in category 'running') ----- clearPackageCache + "Remove all mock packages created during the tests from the package cache." + + | directory | + super clearPackageCache. + directory := MCCacheRepository default directory. + (directory fileNamesMatching: self packageName, '*') do: [ :each | + directory deleteFileNamed: each ]! - | dir | - dir := MCCacheRepository default directory. - (dir fileNamesMatching: 'MonticelloMocks*') do: [:ea | dir deleteFileNamed: ea]. - (dir fileNamesMatching: 'MonticelloTest*') do: [:ea | dir deleteFileNamed: ea]. - (dir fileNamesMatching: 'rev*') do: [:ea | dir deleteFileNamed: ea]. - (dir fileNamesMatching: 'foo-*') do: [:ea | dir deleteFileNamed: ea]. - (dir fileNamesMatching: 'foo2-*') do: [:ea | dir deleteFileNamed: ea].!
Item was changed: ----- Method: MCWorkingCopyTest>>tearDown (in category 'running') ----- tearDown + + super tearDown. workingCopy unregister. self restoreMocks. - self clearPackageCache. Utilities setAuthorInitials: savedInitials.!
packages@lists.squeakfoundation.org