Christoph Thiede uploaded a new version of Installer-Core to project The Trunk: http://source.squeak.org/trunk/Installer-Core-ct.451.mcz
==================== Summary ====================
Name: Installer-Core-ct.451 Author: ct Time: 8 September 2022, 9:38:49.346128 pm UUID: 05f0cf03-9bef-9248-881a-a80b6c3a7b64 Ancestors: Installer-Core-eem.450
Accelerates #ensureRecentMetacello by one or two seconds by sharing the Metacello instance for #get and #load. See https://github.com/Metacello/metacello/pull/552#issuecomment-1152634032 for an argument.
=============== Diff against Installer-Core-eem.450 ===============
Item was changed: ----- Method: Installer class>>ensureRecentMetacello (in category 'scripts') ----- ensureRecentMetacello "Copied and adapted from https://github.com/Metacello/metacello/blob/master/README.md" | metacello | ((Smalltalk classNamed: #WebClient) ifNil: [ false ] ifNotNil: [ :webClient | [ (webClient httpHead: 'https://github.com') isSuccess ] on: Error do: [ false ] ]) ifFalse: [ ^self inform: 'Could not connect to "https://github.com%22.%5C%5CYou need an internet connection and SSL support\to install (or update) Metacello.\Please fix those issues and try again.' translated withCRs ]. self isMetacelloInstalled ifFalse: [ | response | "Download base archive of Metacello." response := WebClient httpGet: 'https://files.squeak.org/metacello/metacello-squeak60.sar'. response isSuccess ifFalse: [ self error: ('Could not download Metacello archive: {1}' translated format: {response status})]. "Prepare a clean environment and install it." Smalltalk globals removeKey: #Metacello ifAbsent: ["Ignore prior attempts."]. SARInstaller new fileInFrom: response content asByteArray readStream].
metacello := Smalltalk classNamed: #Metacello.
"Now load latest version of Metacello" metacello new baseline: 'Metacello'; repository: 'github://Metacello/metacello:master/repository'; + get; - get. - metacello new - baseline: 'Metacello'; - repository: 'github://Metacello/metacello:master/repository'; load: #('default' 'Metacello-Help').!