Load Tonel package from local folder

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

Load Tonel package from local folder

BrunoBB
Hi,

I have a very simple Baseline:
baselineOf: spec
        <baseline>
        spec
                for: #common
                do: [
                        spec baseline: 'NeoJSON' with: [ spec repository:
'github://svenvc/NeoJSON:master/repository' ].
                        spec baseline: 'P3' with: [ spec repository: 'github://svenvc/P3' ].
                        spec package: 'Pre-Checkin-Database' with: [ spec requires: #('NeoJSON'
'P3') ].
                ]

The Baseline file is in:
C:\Program Files
(x86)\Pharo\pharo-local\pre-checkin\booking-addons\Pre-Checkin\BaselineOfPreCheckinDatabase

Also in Development Image the following answer an empty collection:
MetacelloToolBox validateBaseline: BaselineOfPreCheckinDatabase.

But in a Fresh Image the following evaluation answer an error:
Metacello new
   repository: 'tonel://C:\Program Files
(x86)\Pharo\pharo-local\pre-checkin\booking-addons\Pre-Checkin\';
   baseline: 'PreCheckinDatabase';
   onLock: [ :ex | ex honor ];
   load.

Any idea what is wrong ?

Never worked with Tonel before but fore sure something similar works fine
with filetree.

Stack:
ByteString(Object)>>doesNotUnderstand: #resolve:
FileLocator>>resolve
FileLocator(AbstractFileReference)>>fileSystem
FileLocator(AbstractFileReference)>>/
IceLibgitRepository class>>localRepositoriesLocation
IceLibgitRepository class>>repositoriesLocation
IceRepositoryCreator>>defaultLocation
IceRepositoryCreator>>locationToUse
IceRepositoryCreator>>validateNotDuplicated
IceRepositoryCreator>>validate
[ self validate.
self isCloning
        ifTrue: [ self cloneRepository ]
        ifFalse: [ self addLocalRepository ] ] in
IceRepositoryCreator>>createRepository in Block: [ self validate....
BlockClosure>>on:do:
IceRepositoryCreator>>createRepository
[ repository := builder createRepository ] in
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryFor:
in Block: [ repository := builder createRepository ]
BlockClosure>>on:do:
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryFor:
[ ^ self createIcebergRepositoryFor: urlToUse ] in
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryWithFallbackFor:url:
in Block: [ ^ self createIcebergRepositoryFor: urlToUse ]
BlockClosure>>on:do:
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryWithFallbackFor:url:
[ | remote |
remote := IceGitRemote url: remoteUrl.
self createIcebergRepositoryWithFallbackFor: remote url: remoteUrl ] in
MCGitHubRepository(MCGitBasedNetworkRepository)>>getOrCreateIcebergRepository
in Block: [ | remote |...
OrderedCollection(Collection)>>detect:ifFound:ifNone:
OrderedCollection(Collection)>>detect:ifNone:
MCGitHubRepository(MCGitBasedNetworkRepository)>>getOrCreateIcebergRepository
IceGithubRepositoryType>>mcRepository
Iceberg class>>mcRepositoryFor:
IceMetacelloPharoPlatform>>createRepository:
MetacelloMCBaselineProject(MetacelloMCProject)>>createRepository:
MetacelloRepositorySpec>>createRepository
[ aSpec createRepository ] in [ :aSpec |
| description repo |
description := aSpec description.
(repo := repositories
        detect: [ :rep | rep description = description ]
        ifNone: [ aSpec createRepository ]) ~~ nil
        ifTrue: [ repos add: repo ] ] in
MetacelloEnsureFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>repositoriesFrom:ignoreOverrides:
in Block: [ aSpec createRepository ]
Array(Collection)>>detect:ifFound:ifNone:





--
Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html

Reply | Threaded
Open this post in threaded view
|

Re: Load Tonel package from local folder

BrunoBB
Hi,

It seems that my previous image was corrupted.

In new Fresh Image the error is the following:
IceLibgitErrorVisitor>>visitGenericError:
IceLibgitErrorVisitor>>visitERROR:
LGit_GIT_ERROR>>acceptError:
[ :error |
location exists
        ifTrue: [ location ensureDeleteAll ].
error acceptError: (IceLibgitErrorVisitor onContext: self) ] in
IceGitClone>>execute in Block: [ :error | ...
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
LGit_GIT_ERROR(Exception)>>signal
LGit_GIT_ERROR class(LGitCallReturnHandler class)>>signalWith:
LGitReturnCodeEnum>>handleLGitReturnCode
LGitRepository(LGitExternalObject)>>withReturnHandlerDo:
LGitRepository>>clone:options:to:
LGitRepository>>clone:options:
[ location ensureCreateDirectory.
repo := LGitRepository on: location.
cloneOptions := LGitCloneOptions
        withCredentialsProvider: (IceCredentialsProvider defaultForRemoteUrl: url).

"Keeping references, because if not the GC take them."
checkoutOptions := cloneOptions checkoutOptions.
callbacks := cloneOptions fetchOptions callbacks.
callbacks transferProgress: IceGitTransferProgress new.
checkoutOptions
        checkoutStrategy: LGitCheckoutStrategyEnum git_checkout_force.
checkoutOptions progressCallback: IceGitCheckoutProgress new.
repo clone: url options: cloneOptions.
(LGitRemote of: repo named: 'origin')
        lookup;
        setUrl: url ] in IceGitClone>>execute in Block: [ location
ensureCreateDirectory....
BlockClosure>>on:do:
IceGitClone>>execute
IceRepositoryCreator>>cloneRepository
[ self validate.
self isCloning
        ifTrue: [ self cloneRepository ]
        ifFalse: [ self addLocalRepository ] ] in
IceRepositoryCreator>>createRepository in Block: [ self validate....
BlockClosure>>on:do:
IceRepositoryCreator>>createRepository
[ repository := builder createRepository ] in
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryFor:
in Block: [ repository := builder createRepository ]
BlockClosure>>on:do:
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryFor:
[ ^ self createIcebergRepositoryFor: urlToUse ] in
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryWithFallbackFor:url:
in Block: [ ^ self createIcebergRepositoryFor: urlToUse ]
BlockClosure>>on:do:
MCGitHubRepository(MCGitBasedNetworkRepository)>>createIcebergRepositoryWithFallbackFor:url:
[ | remote |
remote := IceGitRemote url: remoteUrl.
self createIcebergRepositoryWithFallbackFor: remote url: remoteUrl ] in
MCGitHubRepository(MCGitBasedNetworkRepository)>>getOrCreateIcebergRepository
in Block: [ | remote |...
OrderedCollection(Collection)>>detect:ifFound:ifNone:
OrderedCollection(Collection)>>detect:ifNone:
MCGitHubRepository(MCGitBasedNetworkRepository)>>getOrCreateIcebergRepository




--
Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html

Reply | Threaded
Open this post in threaded view
|

Re: Load Tonel package from local folder

BrunoBB
Hi,

Fixed:

Iceberg enableMetacelloIntegration: false.

I felt with this one again :)

regards,
bruno



--
Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html