[squeak-dev] The Trunk: Tests-mt.498.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Mar 15 14:49:47 UTC 2023


Marcel Taeumel uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-mt.498.mcz

==================== Summary ====================

Name: Tests-mt.498
Author: mt
Time: 15 March 2023, 3:49:46.759667 pm
UUID: 41c6c6f0-c49d-4048-97db-14836db1810a
Ancestors: Tests-eem.497

Remove dependency between Clipboard tests and SqueakMap project.

=============== Diff against Tests-eem.497 ===============

Item was changed:
  ----- Method: ClipboardTest>>testClipboardText (in category 'tests') -----
  testClipboardText
  
  	| uuidString clipboard |
+ 	uuidString := UUID new asString.
- 	uuidString := UUID new asString36.
  	clipboard := Clipboard new.
  	clipboard clipboardText: uuidString.
  	self assert: uuidString equals: clipboard clipboardText asString!

Item was changed:
  ----- Method: ClipboardTest>>testClipboardTextNotifyWith (in category 'tests') -----
  testClipboardTextNotifyWith
  
  	| uuidString clipboard subscriber notifiedText notifiedSource |
+ 	uuidString := UUID new asString.
- 	uuidString := UUID new asString36.
  	clipboard := Clipboard new.
  	subscriber := [ :text :source | 
  		notifiedText := text.
  		notifiedSource := source ].
  	clipboard 
  		when: #contentChanged
  		send: #value:value:
  		to: subscriber.
  	clipboard clipboardText: uuidString.
  	self
  		assert: uuidString equals: notifiedText;
  		assert: nil equals: notifiedSource.
  	clipboard clipboardText: uuidString reversed notifyWith: self.
  	self
  		assert: uuidString reversed equals: notifiedText;
  		assert: self == notifiedSource.
  	clipboard removeActionsWithReceiver: subscriber.
  	clipboard clipboardText: uuidString.
  	self
  		assert: uuidString reversed equals: notifiedText;
  		assert: self == notifiedSource!



More information about the Squeak-dev mailing list