--- a/FileDialog.st	Wed Jul 29 19:33:37 2015 +0200
+++ b/FileDialog.st	Wed Jul 29 19:53:27 2015 +0200
@@ -1597,9 +1597,14 @@
         isLoadDialog ifTrue:[
             okLabelEnabled := BlockValue
                                 with:[:filename| filename notNil 
-                                                       and:[viewFiles 
-                                                                ifTrue:[filename asFilename physicalFilename isRegularFile]
-                                                                ifFalse:[filename asFilename physicalFilename isDirectory]
+                                                       and:[
+                                                             |physicalFilename|
+                                                             physicalFilename := filename asFilename physicalFilename.
+                                                             physicalFilename notNil and:[
+                                                                 viewFiles 
+                                                                    ifTrue:[physicalFilename isRegularFile]
+                                                                    ifFalse:[physicalFilename isDirectory]
+                                                             ].
                                                         ]
                                                   ]
                                 argument:self filenameHolder.
@@ -1890,6 +1895,7 @@
 !
 
 initialize
+    super initialize.
     isLoadDialog := false.
 !