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:
Offray Vladimir Luna Cárdenas 2015-07-11 18:00:25 +00:00
parent 974faa58b8
commit 186e94e37a

View File

@ -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 }