From 34679e1f32b47f4f5c72817d05229af3dbce77c5 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Sat, 18 Jul 2020 13:47:11 -0500
Subject: [PATCH] Testing baselines that load packages from Gitea hosted
 repositories.

---
 .../BaselineOfGrafoscopio.class.st            | 48 +++++++++++++++++--
 1 file changed, 44 insertions(+), 4 deletions(-)

diff --git a/repository/BaselineOfGrafoscopio/BaselineOfGrafoscopio.class.st b/repository/BaselineOfGrafoscopio/BaselineOfGrafoscopio.class.st
index 5c4a6b0..bd60560 100644
--- a/repository/BaselineOfGrafoscopio/BaselineOfGrafoscopio.class.st
+++ b/repository/BaselineOfGrafoscopio/BaselineOfGrafoscopio.class.st
@@ -13,16 +13,56 @@ BaselineOfGrafoscopio >> baseline: spec [
 		do: [ 
 			
 			"Dependencies"
-			spec 
-				baseline: 'Fossil' with: [ spec repository: 'https://code.tupale.co/Offray/Fossil' ].
+			self fossil: spec.
 			spec 
 				package: 'Spec-Glamour' 
 				with: [ spec repository: 'http://smalltalkhub.com/mc/jfabry/Playgroudn/main/' ].
 			
 			"Packages"
-			spec 
-				package: 'Grafoscopio-Utils' with: [ spec requires: #('Fossil') ];
+			self grafoscopioUtils: spec.
+			spec
 				package: 'Grafoscopio' with: [ spec requires: #('Grafoscopio-Utils' 'Spec-Glamour' ) ] 
 		]
 
 ]
+
+{ #category : #'as yet unclassified' }
+BaselineOfGrafoscopio >> fossil: spec [
+	"I load the configuration of Fossil using a external Gitea repository."
+	"While more Git independient providers are implemented in Monticello, I will use Iceberg
+	to download the repository and load it from a local directory"	
+			
+	| location |
+	location := FileLocator localDirectory / 'iceberg' / 'Offray' / 'Fossil'.
+	(IceRepositoryCreator new 
+		location: location;
+		remote: (IceGitRemote url: 'https://code.tupale.co/Offray/Fossil.git');
+		createRepository)
+	register.
+
+	Metacello new
+		repository: 'gitlocal://', location fullName;
+		baseline: 'Fossil';
+		load.
+	spec project: 'Fossil'
+]
+
+{ #category : #'as yet unclassified' }
+BaselineOfGrafoscopio >> grafoscopioUtils: spec [
+	"I load the configuration of this package using a external Gitea repository."
+	"While more Git independient providers are implemented in Monticello, I will use Iceberg
+	to download the repository and load it from a local directory"	
+			
+	| location |
+	location := FileLocator localDirectory / 'iceberg' / 'Offray' / 'GrafoscopioUtils'.
+	(IceRepositoryCreator new 
+		location: location;
+		remote: (IceGitRemote url: 'https://code.tupale.co/Offray/GrafoscopioUtils.git');
+		createRepository)
+	register.
+
+	Metacello new
+		repository: 'gitlocal://', location fullName;
+		load.
+	spec project: 'Grafoscopio-Utils' with: [ spec requires: #('Fossil') ].
+]