<div dir="ltr"><div dir="ltr">Am Mo., 8. Apr. 2019 um 13:57 Uhr schrieb Levente Uzonyi <<a href="mailto:leves@caesar.elte.hu">leves@caesar.elte.hu</a>>:<br></div><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">>  ----- Method: Installer class>>ensureRecentMetacello (in category 'scripts') -----<br>
>  ensureRecentMetacello<br>
>       "Copied and adapted from <a href="https://github.com/Metacello/metacello/blob/master/README.md" rel="noreferrer" target="_blank">https://github.com/Metacello/metacello/blob/master/README.md</a>"<br>
><br>
>       | metacello |<br>
>       ((Smalltalk classNamed: #WebClient)<br>
>               ifNil: [ false ]<br>
>               ifNotNil: [ :webClient |<br>
>                       [ (webClient httpHead: '<a href="https://github.com" rel="noreferrer" target="_blank">https://github.com</a>') isSuccess ]<br>
>                               on: Error<br>
>                               do: [ false ] ])<br>
>               ifFalse: [ ^self inform: 'Could not connect to "<a href="https://github.com" rel="noreferrer" target="_blank">https://github.com</a>".\\You need an internet connection and SSL support\to install (or update) Metacello.\\Please fix those issues and try again.' translated withCRs ].<br>
> <br>
> +     metacello := Smalltalk classNamed: #Metacello.<br>
> +     (metacello name = #Metacello) ifFalse: [<br>
> -     metacello := (Smalltalk classNamed: #Metacello) ifNil: [<br>
<br>
This trick deserves a comment. It relies on the loose implementation of <br>
#classNamed: of Environment and existence of Object >> #name. Both of <br>
which I'd rather see changed.<br></blockquote><div><br></div><div>    metacello := Smalltalk classNamed: #Metacello.<br></div><div>    metacello = MetacelloStub ifFalse: [</div><div><br></div><div>instead + a comment maybe?</div></div></div>