The Trunk: Installer-Core-ul.422.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Installer-Core-ul.422.mcz

commits-2
Levente Uzonyi uploaded a new version of Installer-Core to project The Trunk:
http://source.squeak.org/trunk/Installer-Core-ul.422.mcz

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

Name: Installer-Core-ul.422
Author: ul
Time: 18 June 2018, 10:43:46.226618 pm
UUID: 418fafe0-8243-4179-b2b3-ca7691208a9b
Ancestors: Installer-Core-ul.421

Do not load MetacelloPreview in Installer class >> #ensureRecentMetacello, because it'll render SqueakSSL unusable by loading an older version of WebClient and SqueakSSL. The method still loads Metacello.

=============== Diff against Installer-Core-ul.421 ===============

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".\\You need an internet connection and SSL support\to install (or update) Metacello.\\Please fix those issues and try again.' translated withCRs ].
 
  metacello := (Smalltalk classNamed: #Metacello) ifNil: [
  "Get the Metacello configuration (for Squeak users)"
  Installer gemsource
  project: 'metacello';
  addPackage: 'ConfigurationOfMetacello';
  install.
 
  "Bootstrap Metacello Preview, using mcz files (#'previewBootstrap' symbolic version"
  ((Smalltalk classNamed: #ConfigurationOfMetacello) project
  version: #'previewBootstrap') load.
-
- "Load the Preview version of Metacello from GitHub"
- (Smalltalk classNamed: #Metacello) new
- configuration: 'MetacelloPreview';
- version: #stable;
- repository: 'github://Metacello/metacello:configuration';
- load.
 
  Smalltalk classNamed: #Metacello ].
 
  "Now load latest version of Metacello"
  metacello new
  baseline: 'Metacello';
  repository: 'github://Metacello/metacello:master/repository';
  get.
  metacello new
  baseline: 'Metacello';
  repository: 'github://Metacello/metacello:master/repository';
  load.!