From 83281067f988632edb832130c5626a6a5112d1c3 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Sat, 11 Jul 2015 17:23:03 +0000
Subject: [PATCH] Repositories: Only opens repositories when .fslckout doesn't
 exists. This code needs refactoring.

---
 repository/Grafoscopio/GrafoscopioBrowser.class.st | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/repository/Grafoscopio/GrafoscopioBrowser.class.st b/repository/Grafoscopio/GrafoscopioBrowser.class.st
index ffaa70c..c7e0bb3 100644
--- a/repository/Grafoscopio/GrafoscopioBrowser.class.st
+++ b/repository/Grafoscopio/GrafoscopioBrowser.class.st
@@ -789,8 +789,12 @@ GrafoscopioBrowser >> defineRemoteRepository [
 	OS2Process command: 
 			'cd ', localRepoDirectory asFileReference fullName, '; ',
 			fossil, ' clone ', remoteRepoUrl, ' reco2.fossil; ',
-			fossil, ' open reco2.fossil'.
-			'echo "commit sended to the repository"'.
+			'echo "Repositorio clonado"'.
+	(localRepoDirectory / '.fslckout') exists ifFalse: [
+		  OS2Process command: 
+				'cd ', localRepoDirectory asFileReference fullName, '; ',
+				fossil, ' open reco2.fossil; ',
+				'echo "Repositorio clonado"'].
 	self inform: 'Repositorio remoto definido y activado'.
 ]