[Pharo-users] Loading TelePharo on Pharo 7

sergio ruiz sergio.rrd at gmail.com
Tue Feb 12 10:45:26 EST 2019


Thanks, Denis..

Will try this in a minute..

On February 12, 2019 at 3:42:06 AM, Denis Kudriashov (dionisiydk at gmail.com)
wrote:

Following script will load TelePharo without error:

Metacello new
  baseline: 'TelePharo';
  repository: 'github://pharo-ide/TelePharo';
  onUpgrade: [:ex | ex useIncoming];
  onConflictUseIncoming;
  load.



пн, 11 февр. 2019 г. в 09:11, Denis Kudriashov <dionisiydk at gmail.com>:

> Hi Serge.
>
> You need to add option to metacello script onConflict: or onUpgrade: with
> block [:warn | warn useIncoming].
> I do not have computer now to give you exact code.
>
> Problem that telepharo depends on old version of Calypso but image
> includes the latest one. It needs to be fixed. I will look at it.
>
> And we should fix install scripts in readme page. It still references my
> repo but it was moved to pharo-ide org
>
> 9 февр. 2019 г. 8:05 PM пользователь "sergio ruiz" <sergio.rrd at gmail.com>
> написал:
>
> Hi, all..
>
> I am looking to install TelePharo on my 7.01 image using the setup found
> at :
>
> https://github.com/pharo-ide/TelePharo
>
> like
>
> Metacello new
>   baseline: 'TelePharo';
>   repository: 'github://dionisiydk/TelePharo';
>   load: 'Server’.
>
> and running into the following error. Any ideas?
>
> Thanks!
>
> MetacelloAllowConflictingProjectUpgrade>>defaultAction
> UndefinedObject>>handleSignal:
> Context>>handleSignal:
> Context>>handleSignal:
> MetacelloAllowConflictingProjectUpgrade(Exception)>>pass
> [ ^ exception pass ] in MetacelloScriptEngine>>handleConflict: in Block: [ ^ exception pass ]
> Dictionary>>at:ifAbsent:
> MetacelloScriptEngine>>handleConflict:
> MetacelloAllowConflictingProjectUpgrade>>handleResolutionFor:
> [ :ex | "option handlers need to be outermost set of handlers ... last line of defense before users are involved" ex handleResolutionFor: self ] in [ [ actionBlock
>     on:
>         MetacelloLookupProjectSpec , MetacelloLookupProjectSpecForLoad
>             , MetacelloProjectSpecLoadedNotification
>             , MetacelloScriptEnsureProjectLoadedForDevelopment
>             , MetacelloLookupBaselineSpecForEnsureLoad
>     do:
>         [ :ex | "lookup and registration handlers need to be innermost set of handlers ...they may throw option notifications" ex handleResolutionFor: self ] ]
>     on:
>         MetacelloAllowProjectDowngrade , MetacelloAllowProjectUpgrade
>             , MetacelloAllowConflictingProjectUpgrade
>     do:
>         [ :ex | "option handlers need to be outermost set of handlers ... last line of defense before users are involved" ex handleResolutionFor: self ] ] in [ [ [ actionBlock
>     on:
>         MetacelloLookupProjectSpec , MetacelloLookupProjectSpecForLoad
>             , MetacelloProjectSpecLoadedNotification
>             , MetacelloScriptEnsureProjectLoadedForDevelopment
>             , MetacelloLookupBaselineSpecForEnsureLoad
>     do:
>         [ :ex | "lookup and registration handlers need to be innermost set of handlers ...they may throw option notifications" ex handleResolutionFor: self ] ]
>     on:
>         MetacelloAllowProjectDowngrade , MetacelloAllowProjectUpgrade
>             , MetacelloAllowConflictingProjectUpgrade
>     do:
>         [ :ex | "option handlers need to be outermost set of handlers ... last line of defense before users are involved" ex handleResolutionFor: self ] ]
>     on: MetacelloAllowLockedProjectChange
>     do:
>         [ :ex | "MetacelloAllowLockedProjectChange need to be outermost handler ... since it is signaled from second line of handlers" ex handleResolutionFor: self ] ] in MetacelloScriptEngine>>handleNotificationsForAction: in Block: [ :ex | "option handlers need to be outermost set ...etc...
> BlockClosure>>cull:
> Context>>evaluateSignal:
> Context>>handleSignal:
> MetacelloAllowConflictingProjectUpgrade(Exception)>>signal
> [ :existing :new |
> (existing hasLoadConflicts: new)
>     ifTrue: [ ((existing canUpgradeTo: new)
>             ifTrue: [ MetacelloAllowProjectUpgrade new ]
>             ifFalse: [ (existing canDowngradeTo: new)
>                     ifTrue: [ MetacelloAllowProjectDowngrade new ]
>                     ifFalse: [ MetacelloAllowConflictingProjectUpgrade new ] ])
>             existingProjectRegistration: existing;
>             newProjectRegistration: new;
>             signal ]
>     ifFalse: [ new ] ] in MetacelloScriptEngine>>lookupProjectSpecFor: in Block: [ :existing :new | ...
> [ :existing | ^ presentBlock value: existing value: newRegistration ] in MetacelloProjectRegistration class>>registrationForProjectSpec:ifAbsent:ifPresent: in Block: [ :existing | ^ presentBlock value: existing value...etc...
> [ :existing | ^ presentBlock value: existing ] in MetacelloProjectRegistry>>registrationFor:ifPresent:ifAbsent: in Block: [ :existing | ^ presentBlock value: existing ]
> BlockClosure>>cull:
> Dictionary>>at:ifPresent:
> MetacelloProjectRegistry>>registrationFor:ifPresent:ifAbsent:
> MetacelloProjectRegistration class>>registrationForProjectSpec:ifAbsent:ifPresent:
> MetacelloScriptEngine>>lookupProjectSpecFor:
> MetacelloScriptEngine>>handleLookupProjectSpec:
> MetacelloLookupProjectSpec>>handleResolutionFor:
> [ :ex | "lookup and registration handlers need to be innermost set of handlers ...they may throw option notifications" ex handleResolutionFor: self ] in [ actionBlock
>     on:
>         MetacelloLookupProjectSpec , MetacelloLookupProjectSpecForLoad
>             , MetacelloProjectSpecLoadedNotification
>             , MetacelloScriptEnsureProjectLoadedForDevelopment
>             , MetacelloLookupBaselineSpecForEnsureLoad
>     do:
>         [ :ex | "lookup and registration handlers need to be innermost set of handlers ...they may throw option notifications" ex handleResolutionFor: self ] ] in [ [ actionBlock
>     on:
>         MetacelloLookupProjectSpec , MetacelloLookupProjectSpecForLoad
>             , MetacelloProjectSpecLoadedNotification
>             , MetacelloScriptEnsureProjectLoadedForDevelopment
>             , MetacelloLookupBaselineSpecForEnsureLoad
>     do:
>         [ :ex | "lookup and registration handlers need to be innermost set of handlers ...they may throw option notifications" ex handleResolutionFor: self ] ]
>     on:
>         MetacelloAllowProjectDowngrade , MetacelloAllowProjectUpgrade
>             , MetacelloAllowConflictingProjectUpgrade
>     do:
>         [ :ex | "option handlers need to be outermost set of handlers ... last line of defense before users are involved" ex handleResolutionFor: self ] ] in [ [ [ actionBlock
>     on:
>         MetacelloLookupProjectSpec , MetacelloLookupProjectSpecForLoad
>             , MetacelloProjectSpecLoadedNotification
>             , MetacelloScriptEnsureProjectLoadedForDevelopment
>             , MetacelloLookupBaselineSpecForEnsureLoad
>     do:
>         [ :ex | "lookup and registration handlers need to be innermost set of handlers ...they may throw option notifications" ex handleResolutionFor: self ] ]
>     on:
>         MetacelloAllowProjectDowngrade , MetacelloAllowProjectUpgrade
>             , MetacelloAllowConflictingProjectUpgrade
>     do:
>         [ :ex | "option handlers need to be outermost set of handlers ... last line of defense before users are involved" ex handleResolutionFor: self ] ]
>     on: MetacelloAllowLockedProjectChange
>     do:
>         [ :ex | "MetacelloAllowLockedProjectChange need to be outermost handler ... since it is signaled from second line of handlers" ex handleResolutionFor: self ] ] in MetacelloScriptEngine>>handleNotificationsForAction: in Block: [ :ex | "lookup and registration handlers need to ...etc...
> BlockClosure>>cull:
> Context>>evaluateSignal:
> Context>>handleSignal:
> Context>>handleSignal:
> Context>>handleSignal:
>
>
>
>
> ----
> peace,
> sergio
> photographer, journalist, visionary
>
> Public Key: http://bit.ly/29z9fG0
> #BitMessage BM-NBaswViL21xqgg9STRJjaJaUoyiNe2dV
> http://www.codeandmusic.com
> http://www.twitter.com/sergio_101
> http://www.facebook.com/sergio101
>
>
> ----
peace,
sergio
photographer, journalist, visionary

Public Key: http://bit.ly/29z9fG0
#BitMessage BM-NBaswViL21xqgg9STRJjaJaUoyiNe2dV
http://www.codeandmusic.com
http://www.twitter.com/sergio_101
http://www.facebook.com/sergio101
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.pharo.org/pipermail/pharo-users_lists.pharo.org/attachments/20190212/74333bc6/attachment-0001.html>


More information about the Pharo-users mailing list