Tony Garnock-Jones uploaded a new version of Environments to project The Trunk: http://source.squeak.org/trunk/Environments-tonyg.80.mcz
==================== Summary ====================
Name: Environments-tonyg.80 Author: tonyg Time: 29 March 2021, 10:18:29.909437 am UUID: 53a02a38-aeab-425c-9157-4f243eafdd49 Ancestors: Environments-dtl.77
Take advantage of System-tonyg.1224, which teaches SystemOrganizer about environments.
=============== Diff against Environments-dtl.77 ===============
Item was changed: ----- Method: Environment>>initializeWithName: (in category 'initialize-release') ----- initializeWithName: aString | smalltalk | self initialize. info := EnvironmentInfo name: aString. + info organization environment: self. - . smalltalk := SmalltalkImage basicNew. smalltalk globals: self. declarations at: #Smalltalk put: smalltalk. declarations at: #Undeclared put: undeclared.!
Item was changed: ----- Method: Environment>>initializeWithSystemDictionary: (in category 'initialize-release') ----- initializeWithSystemDictionary: old self initialize. info := EnvironmentInfo name: 'Smalltalk' organization: old organization packages: PackageOrganizer default. + info organization environment: self. old associationsDo: [:assc | declarations add: assc]. (old at: #Undeclared) associationsDo: [:assc | undeclared add: assc]. (declarations at: #Smalltalk) instVarNamed: 'globals' put: self. declarations at: #Undeclared put: undeclared.!