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
-
- !