DirectoryView.st
changeset 451 a8da4f1924a4
parent 424 2137dff405f0
child 473 396ab247a5af
--- a/DirectoryView.st	Thu Jan 22 15:28:16 1998 +0100
+++ b/DirectoryView.st	Thu Jan 22 15:40:30 1998 +0100
@@ -299,8 +299,8 @@
         ].
         fileDoubleClickAction numArgs = 1
         ifTrue:
-        [
-            fileDoubleClickAction value: self selectionOfFile value baseName
+        [                
+            fileDoubleClickAction value: (directory asFilename construct: self selectionOfFile value baseName) name
         ]
     ]
 !
@@ -318,7 +318,7 @@
         fileSelectAction numArgs = 1
         ifTrue:
         [
-            fileSelectAction value: self selectionOfFile value baseName
+            fileSelectAction value: (directory asFilename construct: self selectionOfFile value baseName) name
         ]
     ]
 ! !