<div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000;text-align: left" dir="ltr">
                                        Hi Tony.<div class="mb_sig"></div>
                                        <div><br></div><div>> <span style="font-family: Arial, Helvetica, sans-serif;font-size: 10pt">Is it intended to be a kind of </span><span style="font-family: Arial, Helvetica, sans-serif;font-size: 10pt">registry of available in-image Environments?</span></div><div><span style="font-family: Arial, Helvetica, sans-serif;font-size: 10pt"><br></span></div><div><span style="font-family: Arial, Helvetica, sans-serif;font-size: 10pt">Yes, looks similar to PackageOrganizer.</span></div><div><span style="font-family: Arial, Helvetica, sans-serif;font-size: 10pt"><br></span></div><div><span style="font-family: Arial, Helvetica, sans-serif;font-size: 10pt">> </span><span style="font-size: 10pt;font-family: Arial, Helvetica, sans-serif">Would some thinking about </span><span style="font-size: 10pt;font-family: Arial, Helvetica, sans-serif">how to surface those in the tooling be welcome?</span></div><div><span style="font-size: 10pt;font-family: Arial, Helvetica, sans-serif"><br></span></div><div><span style="font-size: 10pt;font-family: Arial, Helvetica, sans-serif">Yes, indeed. :-) I just added ToolSet cass >> #browseEnvironment: and Environment >> #browse to Trunk. And I noticed that something seems to be missing from empty environments since I cannot compile a new class into it through the Browser. Not even "Smalltalk" as a global can be resovled -- even though it is in "declarations". Maybe Environment >> #initializeWithName: is not correct?</span></div><div><br></div><div>Have fun! :-)</div><div><br></div><div><span style="font-size: 10pt;font-family: Arial, Helvetica, sans-serif">Best,</span></div><div><span style="font-size: 10pt;font-family: Arial, Helvetica, sans-serif">Marcel</span></div><blockquote class="history_container" type="cite" style="border-left-style: solid;border-width: 1px;margin-top: 20px;margin-left: 0px;padding-left: 10px;min-width: 500px">
                        <p style="color: #AAAAAA; margin-top: 10px;">Am 24.03.2021 16:40:28 schrieb Tony Garnock-Jones <tonyg@leastfixedpoint.com>:</p><div style="font-family:Arial,Helvetica,sans-serif">Hi all,<br><br>I've been experimenting with Environments a little. They look promising, <br>but if I understand correctly we don't have much in the way of tool <br>support for them yet?<br><br>Would a patch to ToolSet be welcome to add, say, `browseEnvironment:` <br>and a convenience `Environment >> browse` to the various ToolSets? It <br>took a little digging before I found<br><br>(Browser new selectEnvironment: someEnvironment) buildAndOpenFullBrowser<br><br>Further than that, there seems not to be many users of Environment's <br>class-side Instances variable yet. Is it intended to be a kind of <br>registry of available in-image Environments? Would some thinking about <br>how to surface those in the tooling be welcome?<br><br>Tony<br><br><br><br>On 3/24/21 3:36 PM, commits@source.squeak.org wrote:<br>> Tony Garnock-Jones uploaded a new version of Tools to project The Trunk:<br>> http://source.squeak.org/trunk/Tools-tonyg.1032.mcz<br>> <br>> ==================== Summary ====================<br>> <br>> Name: Tools-tonyg.1032<br>> Author: tonyg<br>> Time: 24 March 2021, 4:36:27.132139 pm<br>> UUID: 1077d608-e946-49dd-99f0-3a55ffe06e81<br>> Ancestors: Tools-mt.1031<br>> <br>> Repair Browser to allow selection of classes in non-default Environments.<br>> <br>> =============== Diff against Tools-mt.1031 ===============<br>> <br>> Item was changed:<br>>    ----- Method: Browser>>addTrait (in category 'traits') -----<br>>    addTrait<br>>            | input trait |<br>>           input := UIManager default request: 'add trait'.<br>>          input isEmptyOrNil ifFalse: [<br>> +           trait := self environment classNamed: input.<br>> -            trait := Smalltalk classNamed: input.<br>>             (trait isNil or: [trait isTrait not]) ifTrue: [<br>>                           ^self inform: 'Input invalid. ' , input , ' does not exist or is not a trait'].<br>>                   self selectedClass setTraitComposition: self selectedClass traitComposition asTraitComposition +  trait.<br>>                  self contentsChanged].<br>>    !<br>> <br>> Item was changed:<br>>    ----- Method: Browser>>hasClassSelected (in category 'class list') -----<br>>    hasClassSelected<br>> +      ^ selectedClassName notNil and: [(self environment classNamed: selectedClassName) notNil]!<br>> -      ^ selectedClassName notNil and: [(Smalltalk classNamed: selectedClassName) notNil]!<br>> <br>> <br><br></div></blockquote></div>