#UI_ENHANCEMENT by cg draft
authorClaus Gittinger <cg@exept.de>
Wed, 20 Feb 2019 12:08:15 +0100
changeset 3639 e8a2e6f41121
parent 3638 0b8614c96523
child 3640 278e1952a646
#UI_ENHANCEMENT by cg class: Tools::InternationalLanguageTranslationEditor comment/format in: #readResourceFile: class: Tools::InternationalLanguageTranslationEditor class changed: #openOnFile: #openOnPackage:
Tools__InternationalLanguageTranslationEditor.st
--- a/Tools__InternationalLanguageTranslationEditor.st	Wed Feb 20 11:47:16 2019 +0100
+++ b/Tools__InternationalLanguageTranslationEditor.st	Wed Feb 20 12:08:15 2019 +0100
@@ -1024,23 +1024,29 @@
 !InternationalLanguageTranslationEditor class methodsFor:'startup'!
 
 openOnFile:aFilename
-    |fn|
+    |fn editor|
 
     fn := aFilename asFilename.
 
-    ^ self new
-	allButOpen;
-	readResourceFile:fn asLanguage:fn withoutSuffix baseName;
-	openWindow;
-	yourself.
+    ^ (editor := self new)
+        allButOpen;
+        readResourceFile:fn asLanguage:(fn withoutSuffix baseName);
+        openWindow;
+        yourself.
+
+    "Modified: / 20-02-2019 / 12:06:24 / Claus Gittinger"
 !
 
 openOnPackage:aPackageId
-    ^ self new
-	allButOpen;
-	readResourceFileForPackage:aPackageId;
-	openWindow;
-	yourself.
+    |editor|
+    
+    ^ (editor := self new)
+        allButOpen;
+        readResourceFileForPackage:aPackageId;
+        openWindow;
+        yourself.
+
+    "Modified: / 20-02-2019 / 12:06:33 / Claus Gittinger"
 ! !
 
 !InternationalLanguageTranslationEditor class methodsFor:'tableColumns specs'!
@@ -2073,7 +2079,9 @@
     lang := self requestLanguage.
     lang isNil ifTrue:[^ self ].
 
-    self readResourceFile:aFilename asLanguage:lang asSymbol
+    self readResourceFile:aFilename asLanguage:(lang asSymbol)
+
+    "Modified (format): / 20-02-2019 / 11:52:39 / Claus Gittinger"
 !
 
 readResourceFileForPackage:aPackage