Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Repositories > Dirty fix: When the remote repository is defined, it's also stored on metadata and also the local repository.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2015-07-11 18:00:25 +00:00
parent 974faa58b8
commit 186e94e37a
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
repository/Grafoscopio/GrafoscopioBrowser.class.st
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,7 +820,8 @@ 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:
'Repositorio local activado: ', Character cr,
(mainTree metadata at: 'localRepository') (mainTree metadata at: 'localRepository')
] ]