Repositories > Dirty fix: When the remote repository is defined, it's also stored on metadata and also the local repository.
This commit is contained in:
parent
974faa58b8
commit
186e94e37a
@ -786,6 +786,10 @@ GrafoscopioBrowser >> defineRemoteRepository [
|
|||||||
remoteRepoUrl := 'http://hackbo.co/deltas/repos.fossil/reco2/'.
|
remoteRepoUrl := 'http://hackbo.co/deltas/repos.fossil/reco2/'.
|
||||||
localRepoDirectory := FileLocator documents asFileReference / 'ReCo2'.
|
localRepoDirectory := FileLocator documents asFileReference / 'ReCo2'.
|
||||||
localRepoDirectory ensureCreateDirectory.
|
localRepoDirectory ensureCreateDirectory.
|
||||||
|
mainTree metadata ifNil: [mainTree metadata: Dictionary new].
|
||||||
|
mainTree metadata
|
||||||
|
at: 'remoteRepository' put: remoteRepoUrl;
|
||||||
|
at: 'localRepository' put: (localRepoDirectory / 'reco2.fossil') fullName.
|
||||||
OS2Process command:
|
OS2Process command:
|
||||||
'cd ', localRepoDirectory asFileReference fullName, '; ',
|
'cd ', localRepoDirectory asFileReference fullName, '; ',
|
||||||
fossil, ' clone ', remoteRepoUrl, ' reco2.fossil; ',
|
fossil, ' clone ', remoteRepoUrl, ' reco2.fossil; ',
|
||||||
@ -816,8 +820,9 @@ GrafoscopioBrowser >> enableLocalRepository [
|
|||||||
OSProcess command:
|
OSProcess command:
|
||||||
'cd ', localRepository parent fullName,';',
|
'cd ', localRepository parent fullName,';',
|
||||||
'exec ', fossil, ' open ', localRepository fullName].
|
'exec ', fossil, ' open ', localRepository fullName].
|
||||||
self inform: 'Repositorio local activado: ', Character cr,
|
self inform:
|
||||||
(mainTree metadata at: 'localRepository')
|
'Repositorio local activado: ', Character cr,
|
||||||
|
(mainTree metadata at: 'localRepository')
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #persistence }
|
{ #category : #persistence }
|
||||||
|
Loading…
Reference in New Issue
Block a user