"{ Package: 'stx:goodies/monticello' }"

MCRepository subclass:#MCWriteOnlyRepository
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Monticello-Repositories'
!


!MCWriteOnlyRepository methodsFor:'as yet unclassified'!

includesVersionNamed: aString
	^ false
!

morphicOpen: aWorkingCopy
	self inform: 'This repository is write-only'
!

versionWithInfo: aVersionInfo ifAbsent: aBlock
	^ aBlock value
! !

!MCWriteOnlyRepository class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCWriteOnlyRepository.st,v 1.1 2006-11-22 13:23:08 cg Exp $'
! !