--- a/DirectoryView.st	Wed Aug 07 11:53:42 2013 +0200
+++ b/DirectoryView.st	Sun Aug 11 11:59:20 2013 +0200
@@ -398,7 +398,7 @@
     super initialize.
     self createBuilder.
 
-    directory :=  directory ? '.' asFilename asAbsoluteFilename directoryName.
+    directory :=  (directory ? '.') asFilename asAbsoluteFilename directoryName.
     monitoring := false.
     fileAttributes := #('File name' 'Size' 'Modified').
     self selectionOfFileFilter value: (self listOfFileFilters at: 1 ifAbsent: [nil]).