From 186e94e37a315b5309d6555b06b5a4d757429d7e Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Sat, 11 Jul 2015 18:00:25 +0000 Subject: [PATCH] Repositories > Dirty fix: When the remote repository is defined, it's also stored on metadata and also the local repository. --- repository/Grafoscopio/GrafoscopioBrowser.class.st | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/repository/Grafoscopio/GrafoscopioBrowser.class.st b/repository/Grafoscopio/GrafoscopioBrowser.class.st index a82e48e..0417f4f 100644 --- a/repository/Grafoscopio/GrafoscopioBrowser.class.st +++ b/repository/Grafoscopio/GrafoscopioBrowser.class.st @@ -786,6 +786,10 @@ GrafoscopioBrowser >> defineRemoteRepository [ remoteRepoUrl := 'http://hackbo.co/deltas/repos.fossil/reco2/'. localRepoDirectory := FileLocator documents asFileReference / 'ReCo2'. localRepoDirectory ensureCreateDirectory. + mainTree metadata ifNil: [mainTree metadata: Dictionary new]. + mainTree metadata + at: 'remoteRepository' put: remoteRepoUrl; + at: 'localRepository' put: (localRepoDirectory / 'reco2.fossil') fullName. OS2Process command: 'cd ', localRepoDirectory asFileReference fullName, '; ', fossil, ' clone ', remoteRepoUrl, ' reco2.fossil; ', @@ -816,8 +820,9 @@ GrafoscopioBrowser >> enableLocalRepository [ OSProcess command: 'cd ', localRepository parent fullName,';', 'exec ', fossil, ' open ', localRepository fullName]. - self inform: 'Repositorio local activado: ', Character cr, - (mainTree metadata at: 'localRepository') + self inform: + 'Repositorio local activado: ', Character cr, + (mainTree metadata at: 'localRepository') ] { #category : #persistence }