--- a/AbstractFileBrowser.st	Wed Feb 18 11:22:44 2004 +0100
+++ b/AbstractFileBrowser.st	Wed Feb 18 11:52:45 2004 +0100
@@ -2963,7 +2963,18 @@
 !
 
 fileEncoding:newEncoding
-    self fileEncodingHolder value:newEncoding
+    self fileEncodingHolder value:newEncoding.
+
+    self 
+        applicationNamed:#FileApplicationNoteBook
+        ifPresentDo:[:nb | 
+            |appl|
+
+            appl := nb selectedApplication.
+            appl isTextEditor ifTrue:[
+                appl fileEncoding:newEncoding
+            ]
+        ].
 !
 
 hasFileSelection
@@ -6607,5 +6618,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.203 2004-02-17 12:08:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.204 2004-02-18 10:52:45 cg Exp $'
 ! !