hg/stx-goodies-metacello: MetacelloCopyMemberSpec.st@504152ada1fc (annotated)

1 9e312de5f694 - Initial commit jv parents: diff changeset	1	"{ Package: 'stx:goodies/metacello' }"
9e312de5f694 - Initial commit jv parents: diff changeset	2
9e312de5f694 - Initial commit jv parents: diff changeset	3	MetacelloMemberSpec subclass:#MetacelloCopyMemberSpec
9e312de5f694 - Initial commit jv parents: diff changeset	4	instanceVariableNames:'sourceName'
9e312de5f694 - Initial commit jv parents: diff changeset	5	classVariableNames:''
9e312de5f694 - Initial commit jv parents: diff changeset	6	poolDictionaries:''
9e312de5f694 - Initial commit jv parents: diff changeset	7	category:'Metacello-Core-Members'
9e312de5f694 - Initial commit jv parents: diff changeset	8	!
9e312de5f694 - Initial commit jv parents: diff changeset	9
9e312de5f694 - Initial commit jv parents: diff changeset	10
9e312de5f694 - Initial commit jv parents: diff changeset	11	!MetacelloCopyMemberSpec methodsFor:'accessing'!
9e312de5f694 - Initial commit jv parents: diff changeset	12
9e312de5f694 - Initial commit jv parents: diff changeset	13	methodUpdateSelector
9e312de5f694 - Initial commit jv parents: diff changeset	14
9e312de5f694 - Initial commit jv parents: diff changeset	15	^#copy:
9e312de5f694 - Initial commit jv parents: diff changeset	16	!
9e312de5f694 - Initial commit jv parents: diff changeset	17
9e312de5f694 - Initial commit jv parents: diff changeset	18	sourceName
9e312de5f694 - Initial commit jv parents: diff changeset	19
9e312de5f694 - Initial commit jv parents: diff changeset	20	^sourceName
9e312de5f694 - Initial commit jv parents: diff changeset	21	!
9e312de5f694 - Initial commit jv parents: diff changeset	22
9e312de5f694 - Initial commit jv parents: diff changeset	23	sourceName: aString
9e312de5f694 - Initial commit jv parents: diff changeset	24
9e312de5f694 - Initial commit jv parents: diff changeset	25	sourceName := aString
9e312de5f694 - Initial commit jv parents: diff changeset	26	! !
9e312de5f694 - Initial commit jv parents: diff changeset	27
9e312de5f694 - Initial commit jv parents: diff changeset	28	!MetacelloCopyMemberSpec methodsFor:'actions'!
9e312de5f694 - Initial commit jv parents: diff changeset	29
9e312de5f694 - Initial commit jv parents: diff changeset	30	applyAdd: addBlock copy: copyBlock merge: mergeBlock remove: removeBlock
9e312de5f694 - Initial commit jv parents: diff changeset	31	copyBlock value: self
9e312de5f694 - Initial commit jv parents: diff changeset	32	!
9e312de5f694 - Initial commit jv parents: diff changeset	33
9e312de5f694 - Initial commit jv parents: diff changeset	34	applyToList: aListSpec
9e312de5f694 - Initial commit jv parents: diff changeset	35
9e312de5f694 - Initial commit jv parents: diff changeset	36	aListSpec copy: self
9e312de5f694 - Initial commit jv parents: diff changeset	37	! !
9e312de5f694 - Initial commit jv parents: diff changeset	38
9e312de5f694 - Initial commit jv parents: diff changeset	39	!MetacelloCopyMemberSpec class methodsFor:'documentation'!
9e312de5f694 - Initial commit jv parents: diff changeset	40
9e312de5f694 - Initial commit jv parents: diff changeset	41	version_SVN
9e312de5f694 - Initial commit jv parents: diff changeset	42	^ '$Id:: $'
9e312de5f694 - Initial commit jv parents: diff changeset	43	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Mon, 03 Sep 2012 13:10:51 +0000
changeset 3	504152ada1fc
parent 1	9e312de5f694
permissions	-rw-r--r--