MCMockDefinition.st
author Claus Gittinger <cg@exept.de>
Sat, 20 Aug 2011 14:29:21 +0200
changeset 350 7d32a1a2e700
parent 231 b8aec6c9cf8b
child 653 a8f7ebf2a9b3
permissions -rw-r--r--
initial checkin

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

MCDefinition subclass:#MCMockDefinition
	instanceVariableNames:'token'
	classVariableNames:''
	poolDictionaries:''
	category:'Monticello-Mocks'
!


!MCMockDefinition class methodsFor:'as yet unclassified'!

token: aString

	^ self new token: aString
!

wantsChangeSetLogging
	^ false
! !

!MCMockDefinition methodsFor:'as yet unclassified'!

= definition
	^definition token = token
!

asString

	^ token
!

description

	^ token first
!

hash

	^ token hash
!

printString

	^ token
!

summary

	^ token
!

token

	^ token
!

token: aString

	token := aString
! !

!MCMockDefinition class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMockDefinition.st,v 1.3 2011-08-20 12:29:21 cg Exp $'
!

version_CVS
    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMockDefinition.st,v 1.3 2011-08-20 12:29:21 cg Exp $'
!

version_SVN
    ^ '§Id: MCMockDefinition.st 5 2010-08-29 07:30:29Z vranyj1 §'
! !