Adding functionality to improve the load of external repositories.

src/ExoRepo/ExoRepo.class.st

@@ -12,28 +12,32 @@ ExoRepo >> load [
 	"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 localRepo repoName  |
+	| localRepo repoName  |
 	
 	"Sometimes repoName and packageName are different, following Pharo's conventions.
 	For example the repoName can be MyPackage, while packageName can be My-Package"
 	repoName := self repositoryName.
 	"Local and remote repo definition"
-	location := FileLocator localDirectory / 'iceberg' / (self provider) / repoName.
-	location exists ifFalse: [
+	self local exists ifFalse: [
 		(IceRepositoryCreator new
-			location: location;
+			location: self local;
 			remote: (IceGitRemote url: self repository asString, '.git');
 			createRepository)
 		register
 	].
 	"Package loading"
-	localRepo := 'gitlocal://', location fullName.
+	localRepo := 'gitlocal://', self local fullName.
 	^ Metacello new
 		repository: localRepo;
 		baseline: repoName;
 		load.
 ]
 
+{ #category : #accessing }
+ExoRepo >> local [
+	^ FileLocator localDirectory / 'iceberg' / (self provider) / self repositoryName
+]
+
 { #category : #accessing }
 ExoRepo >> provider [
 	self repository ifNil: [ ^ nil ].