initial checkin
class: MCFileTreeFileSystemUtils
class: MCFileTreeFileSystemUtils class
added:17 methods
"{ Package: 'stx:goodies/monticello/test' }"
MCRepositoryTest subclass:#MCDirectoryRepositoryTest
instanceVariableNames:'directory'
classVariableNames:''
poolDictionaries:''
category:'SCM-Monticello-Tests'
!
!MCDirectoryRepositoryTest methodsFor:'as yet unclassified'!
addVersion: aVersion
| file |
file _ FileStream newFileNamed: (directory fullNameFor: aVersion fileName).
aVersion fileOutOn: file.
file close.
!
directory
directory ifNil:
[directory _ FileDirectory default directoryNamed: 'mctest'.
directory assureExistence].
^ directory
!
setUp
repository _ MCDirectoryRepository new directory: self directory
!
tearDown
self directory recursiveDelete
! !
!MCDirectoryRepositoryTest class methodsFor:'documentation'!
version
^ '$Header: /cvs/stx/stx/goodies/monticello/test/MCDirectoryRepositoryTest.st,v 1.2 2013-05-29 00:00:31 vrany Exp $'
! !