--- a/AbstractFileBrowser.st	Thu Feb 21 17:32:52 2019 +0100
+++ b/AbstractFileBrowser.st	Thu Feb 21 17:49:59 2019 +0100
@@ -19,8 +19,8 @@
 		DefaultFilters DirectoryBookmarks LastEnforcedNameSpace
 		LastFileDiffDirectory LastFileDiffFile LastFileSelection
 		LastMercurialRepository LastMoveDestination LastMustMatchPattern
-		LastScriptBlockString RootHolder RuntimeAspects
-		VisitedDirectories MaxFileSizeShownWithoutAsking'
+		LastScriptBlockString MaxFileSizeShownWithoutAsking RootHolder
+		RuntimeAspects VisitedDirectories'
 	poolDictionaries:''
 	category:'Interface-Tools-File'
 !
@@ -3080,15 +3080,15 @@
 
     fileName := f baseName.
     f isDirectory ifTrue:[
-        Dialog warn:(resources string:'%1 is a directory.' with:fileName).
+        Dialog warn:(resources string:'"%1" is a directory.' with:fileName).
         ^ nil
     ].
     f exists ifFalse:[
-        Dialog warn:(resources string:'oops, ''%1'' is gone or unreadable.' with:fileName).
+        Dialog warn:(resources string:'oops, "%1" is gone or unreadable.' with:fileName).
         ^ nil
     ].
     f isReadable ifFalse:[
-        Dialog warn:(resources string:'''%1'' is unreadable.' with:fileName).
+        Dialog warn:(resources string:'"%1" is unreadable.' with:fileName).
         ^ nil
     ].
     f fileSize > (self maxFileSizeShownWithoutAsking) ifTrue:[
@@ -3145,6 +3145,7 @@
 
     "Created: / 12-11-2017 / 12:08:10 / cg"
     "Modified: / 19-11-2017 / 15:01:34 / cg"
+    "Modified: / 21-02-2019 / 17:48:48 / Claus Gittinger"
 !
 
 contentsOfFileAsHexDump:f