#QUALITY by exept
class: Tools::InternationalLanguageTranslationEditor
changed: #saveResourceFile:for:
ensure file is closed.
--- a/Tools__InternationalLanguageTranslationEditor.st Sun Sep 08 17:31:10 2019 +0200
+++ b/Tools__InternationalLanguageTranslationEditor.st Fri Sep 13 09:54:55 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"{ Package: 'stx:libtool2' }"
"{ NameSpace: Tools }"
@@ -2985,10 +2987,16 @@
keyStringsToLanguageMappings atLanguage: lang putFilename: aFilename.
aStream := FileStream newFileNamed: aFilename.
- self printLanguage: lang on: aStream.
- aStream flush;
- close.
- DialogBox information: 'The resource file for the language ', lang printString storeString, ' was saved in the file: ', aFilename nameString
+ [
+ self printLanguage: lang on: aStream.
+ aStream flush
+ ] ensure:[
+ aStream close.
+ ].
+ DialogBox
+ information: 'The resource file for the language %1 was saved in the file: %2'
+ with:lang printString storeString
+ with:aFilename nameString
! !
!InternationalLanguageTranslationEditor methodsFor:'searching'!
@@ -3018,7 +3026,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])
@@ -3580,8 +3588,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'.