#DOCUMENTATION by cg
class: Tools::InternationalLanguageTranslationEditor
comment/format in: #requestPackage
--- 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.