[squeak-dev] The Inbox: Network-ct.245.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Nov 14 18:52:52 UTC 2020


A new version of Network was added to project The Inbox:
http://source.squeak.org/inbox/Network-ct.245.mcz

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

Name: Network-ct.245
Author: ct
Time: 14 November 2020, 7:52:49.139394 pm
UUID: c84e2aa6-50a0-af4f-b039-e56ab9199838
Ancestors: Network-mt.243

Support absolute file paths in Url absoluteFromFileNameOrUrlString: as well. This functionality is required for ProjectLauncher, which might be explained in the best way by the next few commits that I am going to upload to the inbox ...

=============== Diff against Network-mt.243 ===============

Item was changed:
  ----- Method: FileUrl>>privateInitializeFromText:relativeTo: (in category 'private-initialization') -----
  privateInitializeFromText: pathString relativeTo: aUrl
  	"<pathString> should be a filesystem path.
  	This url is adjusted to be aUrl + the path."
  
+ 	| newPath |
- 	| bare newPath |
  	self host: aUrl host.
  	self initializeFromPathString: pathString.
+ 	self isAbsolute ifTrue: [^ self].
  	self isAbsolute: aUrl isAbsolute.
+ 	
- 
  	newPath := aUrl path copy.
  	newPath removeLast.	"empty string that says its a directory"
  	path do: [ :token |
  		((token ~= '..') and: [token ~= '.']) ifTrue: [ 
  			newPath addLast: token unescapePercents ].
  		token = '..' ifTrue: [ 
  			newPath isEmpty ifFalse: [ 
  				newPath last = '..' ifFalse: [ newPath removeLast ] ] ].
  		"token = '.' do nothing" ].
+ 	path := newPath.!
- 	path := newPath
- 
- 	!



More information about the Squeak-dev mailing list