Fix #864

Handle missing code subdirectory
pharo-vcs · Jun 18, 2018 · 7262543 · 7262543
1 parent 4f9e2b5
commit 7262543
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/Iceberg-TipUI.package/IceTipRepairLocateRepository.class/instance/basicExecute.st b/Iceberg-TipUI.package/IceTipRepairLocateRepository.class/instance/basicExecute.st
@@ -3,7 +3,7 @@ basicExecute
 	| dialog |
 	dialog := IceTipLocalRepositoryPanel new
 		location: (self repository location ifNil: [ self defaultLocation ]);
-		subdirectory: self repository subdirectory;
+		subdirectory: (self repository subdirectory ifNil: [ self defaultSubdirectory ]);
 		yourself.
 	dialog openDialogWithSpec 
 		okAction: [ 

diff --git a/Iceberg-TipUI.package/IceTipRepairLocateRepository.class/instance/defaultSubdirectory.st b/Iceberg-TipUI.package/IceTipRepairLocateRepository.class/instance/defaultSubdirectory.st
@@ -0,0 +1,3 @@
+executing
+defaultSubdirectory
+	^ IceLibgitRepository defaultCodeSubdirectory