--- a/FilenameWidgetWithHistory.st	Fri Oct 22 15:54:22 2010 +0200
+++ b/FilenameWidgetWithHistory.st	Mon Oct 25 11:55:08 2010 +0200
@@ -292,8 +292,11 @@
                 fromDirectory:defaultDir.
     ].
     path isEmptyOrNil ifTrue:[ ^ self ].
+    path := path asFilename.
 
-    initialDirectoryHolder value:path asFilename directory.
+    initialDirectoryHolder value:path directory.
+    path := path pathName.
+
     "/ lastDirectoryHolder value:path directory.
     self model notNil ifTrue:[
         self model value:path.
@@ -306,9 +309,9 @@
 !FilenameWidgetWithHistory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.15 2010-10-21 13:06:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.16 2010-10-25 09:55:08 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.15 2010-10-21 13:06:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.16 2010-10-25 09:55:08 stefan Exp $'
 ! !