--- a/FilenameEditField.st	Sun Sep 08 16:04:20 2019 +0200
+++ b/FilenameEditField.st	Sun Sep 08 16:34:56 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -230,7 +232,7 @@
         directory := canonContents asFilename.
         (directory exists 
          and:[directory isDirectory 
-         and:[directory directoryContents size = 1 ]]) ifTrue:[
+         and:[directory directoryContents size == 1 ]]) ifTrue:[
             newDir := directory / (directory directoryContents first).
             false "newDir isSymbolicLink" ifTrue:[
                 newString := newDir name