diff -r 75c5a1bfdf90 -r 0a3d41765245 AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Wed Feb 19 21:05:43 2020 +0100
+++ b/AbstractFileBrowser.st	Wed Feb 19 21:06:21 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -3006,7 +3008,7 @@
                                     "/ are perfect here, but usually not available in the font
                                     "/ and we have currently no way of knowing if they are...
                                     "/ (could let the font draw into a bitmap and check if there is something...)
-                                    "/ For now, write a dot.·
+                                    "/ For now, write a dot.·
                                     "/ charPrinted := (Character value:(byte + 16r2400))
                                 ].
                             ].
@@ -5884,13 +5886,13 @@
     bookmarks notEmptyOrNil ifTrue:[
         menu addSeparator.
         bookmarks do:[:dirName |
-            menu addItem:(MenuItem 
-                            label:dirName asString 
-                            itemValue:[
-                                (self currentSelectedDirectories includes:dirName) ifFalse:[
-                                    self setCurrentFileName:dirName.
-                                ].
-                            ]).
+            menu 
+                addItemLabel:dirName asString 
+                value:[
+                    (self currentSelectedDirectories includes:dirName) ifFalse:[
+                        self setCurrentFileName:dirName.
+                    ].
+                ].
         ].
     ].
     menu findGuiResourcesIn:self.
@@ -6073,11 +6075,9 @@
     menu := Menu new.
 
     histCopy do:[:aFile| 
-        menu addItem:(MenuItem 
-                        label:aFile asString 
-                        itemValue:[
-                            self setCurrentFileName:(aFile path asFilename).
-                        ]).
+        menu 
+            addItemLabel:aFile asString 
+            value:[ self setCurrentFileName:(aFile path asFilename) ].
     ].
     menu addSeparator.
 
@@ -9166,7 +9166,7 @@
             ] ifFalse:[sig == HaltInterrupt ifTrue:[ |sender|
                 label := msg := 'Breakpoint/Halt in fileIn'.
                 sender := ex suspendedContext.
-                msg := msg , ('\\in %1 » %2' bindWith:(sender receiver class name) with:(sender sender selector))
+                msg := msg , ('\\in %1 » %2' bindWith:(sender receiver class name) with:(sender sender selector))
             ] ifFalse:[
                 label := 'Error in fileIn'.
                 msg := 'error in fileIn: %1'