The Trunk: Collections-ct.1116.mcz

Marcel Taeumel uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-ct.1116.mcz

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

Name: Collections-ct.1116
Author: ct
Time: 10 June 2026, 12:13:40.0293 am
UUID: 6f55ec2a-99a1-4961-bd48-5e15b8f1699c
Ancestors: Collections-ct.1115

Adds escaping for semicolons in TextURLs when storing as chunks.

=============== Diff against Collections-ct.1115 ===============

Item was changed:
  ----- Method: TextURL class>>scanFrom: (in category 'fileIn/Out') -----
  scanFrom: strm
  	"read a link in the funny format used by Text styles on files. Rhttp://www.disney.com;"
  
+ 	| url |
+ 	url := '' writeStream.
+ 	[url nextPutAll: (strm upTo: $;).
+ 	strm peek = $; ifTrue: [url nextPut: $;. strm next]; yourself] whileTrue.
+ 	^ self new url: url contents!
- 	^ self new url: (strm upTo: $;)!

Item was changed:
  ----- Method: TextURL>>writeScanOn: (in category 'fileIn/fileOut') -----
  writeScanOn: strm
  
+ 	strm
+ 		nextPut: self class scanCharacter;
+ 		nextPutAll: (self url copyReplaceAll: ';' with: ';;');
+ 		nextPut: $;!
- 	strm nextPut: self class scanCharacter; nextPutAll: url; nextPut: $;!

Squeak-dev mailing list -- [email protected]
To unsubscribe send an email to [email protected]