--- a/Tools__InternationalLanguageTranslationEditor.st	Wed Aug 02 17:10:03 2017 +0200
+++ b/Tools__InternationalLanguageTranslationEditor.st	Wed Aug 16 12:31:30 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "{ Package: 'stx:libtool2' }"
 
 "{ NameSpace: Tools }"
@@ -1147,7 +1145,7 @@
 	    selectedAssociation value sameAs: association value] ifNone:[collection add: association].
 	collection].
     selectedTranslation := Dialog
-	choose:'Choose one if you consider it´s usefull to translate:
+	choose:'Choose one if you consider it´s usefull to translate:
     ',
 	'<', key, '>  ', (self currentExampleLanguageText ifNil:[''])
 	fromList: (similarTranslationsAssociations collect:[:each |  '<', each key, '>  ', each value])
@@ -1761,9 +1759,15 @@
 !
 
 extractTranslationsFromProject
-    |projectID newTranslations|
-
-    projectID := Dialog requestProject:(resources string:'Package to extract translations from:') initialAnswer:(lastExtractedProject ? LastExtractedProject) suggestions:(OrderedCollection with:(lastExtractedProject ? LastExtractedProject)).
+    |projectID newTranslations initialAnswer suggestions|
+
+    initialAnswer := lastExtractedProject ? LastExtractedProject.
+    suggestions := initialAnswer isNil ifTrue:[
+        OrderedCollection new
+    ] ifFalse:[
+        OrderedCollection with:initialAnswer
+    ].
+    projectID := Dialog requestProject:(resources string:'Package to extract translations from:') initialAnswer:initialAnswer suggestions:suggestions.
     projectID notNil ifTrue:[
         projectID := projectID withoutSeparators asSymbol.
     ].
@@ -1785,7 +1789,7 @@
     ].
 
     "Modified: / 19-02-2015 / 11:44:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified (format): / 02-08-2017 / 17:07:55 / mawalch"
+    "Modified: / 16-08-2017 / 12:29:21 / mawalch"
 !
 
 generateMissingTranslations: keys for: languages using: translator    
@@ -3305,8 +3309,8 @@
     self addLanguage:#'de'.
     self addLanguage:#'fr'.
 
-    self at:'open' language:#'de' put:'öffnen'.
-    self at:'close' language:#'de' put:'schließen'.
+    self at:'open' language:#'de' put:'öffnen'.
+    self at:'close' language:#'de' put:'schließen'.
     self at:'yes' language:#'de' put:'ja'.
     self at:'no' language:#'de' put:'nein'.
     self at:'cancel' language:#'de' put:'abbrechen'.