"
I am a special because I announce changes only if the new value set is different from the current value.
"
Class {
	#name : #IdentityNewValueHolder,
	#superclass : #NewValueHolder,
	#category : #NewValueHolder
}

{ #category : #accessing }
IdentityNewValueHolder >> value: anObject [

	self value == anObject ifTrue: [ ^ anObject ].
	super value: anObject
]

"
I am a special because I announce changes only if the new value set is different from the current value.
"
Class {
	#name : #IdentityNewValueHolder,
	#superclass : #NewValueHolder,
	#category : #NewValueHolder
}

{ #category : #accessing }
IdentityNewValueHolder >> value: anObject [

	self value == anObject ifFalse: [	super value: anObject ].
]

Make IdentitfyNewValueHolder>>value: return a consistent value
Make IdentitfyNewValueHolder>>value: return a consistent value
estebanlm/pharo,estebanlm/pharo,estebanlm/pharo