#REFACTORING by stefan draft
authorStefan Vogel <sv@exept.de>
Thu, 11 Apr 2019 18:30:42 +0200
changeset 3656 84177d270097
parent 3655 194726a985db
child 3657 bb1dd1360035
#REFACTORING by stefan class: FileSelectionBrowser changed: #directory: use \"asFilename pathName\" instead of \"asFilename asAbsoluteFilename pathName\" ist is equivalent!
FileSelectionBrowser.st
--- 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