FileSelectionBrowser.st
changeset 3656 84177d270097
parent 3490 e3b6106384a8
child 3858 236ce50a9d68
--- a/FileSelectionBrowser.st	Wed Mar 13 22:17:11 2019 +0100
+++ b/FileSelectionBrowser.st	Thu Apr 11 18:30:42 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -382,10 +384,10 @@
 !FileSelectionBrowser methodsFor:'accessing'!
 
 directory: aDirectory
+    directory := (aDirectory ? Filename currentDirectory) asFilename pathName
 
-    directory := (aDirectory ? Filename currentDirectory) asFilename asAbsoluteFilename pathName
-
-    "Modified: / 17.8.1998 / 10:15:53 / cg"
+    "Modified: / 17-08-1998 / 10:15:53 / cg"
+    "Modified: / 11-04-2019 / 18:04:31 / Stefan Vogel"
 !
 
 directoryView