#DOCUMENTATION by cg draft
authorClaus Gittinger <cg@exept.de>
Sat, 13 Oct 2018 13:45:40 +0200
changeset 3620 c0f9b9ddd6bd
parent 3619 2a3ea8ecea4d
child 3621 5d7d4931b7c7
#DOCUMENTATION by cg class: Tools::InternationalLanguageTranslationEditor comment/format in: #requestPackage
Tools__InternationalLanguageTranslationEditor.st
--- a/Tools__InternationalLanguageTranslationEditor.st	Fri Oct 12 15:21:07 2018 +0200
+++ b/Tools__InternationalLanguageTranslationEditor.st	Sat Oct 13 13:45:40 2018 +0200
@@ -1603,18 +1603,17 @@
 
     allProjects := Smalltalk allPackageIDs.
     projectsWithResources := allProjects
-				select:[:pID |
-				    |dir|
-				    dir := Smalltalk projectDirectoryForPackage:pID.
-				    dir notNil and:[
-				    (dir asFilename construct:'resources') exists]
-				].
+                                select:[:pID |
+                                    |dir|
+                                    dir := Smalltalk projectDirectoryForPackage:pID.
+                                    dir notNil and:[ (dir asFilename construct:'resources') exists]
+                                ].
 
     package := Dialog
-	requestProject:(resources string:'Name of Package:')
-	from:projectsWithResources
-	initialAnswer:LastProject
-	suggestions:nil.
+        requestProject:(resources string:'Name of Package:')
+        from:projectsWithResources
+        initialAnswer:LastProject
+        suggestions:nil.
 
     package isEmptyOrNil ifTrue:[^ nil ].
     LastProject := package.