--- a/Filename.st	Mon Mar 04 12:41:02 2019 +0100
+++ b/Filename.st	Mon Mar 04 15:44:10 2019 +0100
@@ -1191,14 +1191,31 @@
       or starts with ../)"
 
     self isAbstract ifTrue:[
-	^ ConcreteClass
-	    filenameCompletionFor:aString
-	    directory:inDirectory
-	    directoriesOnly:directoriesOnly
-	    filesOnly:filesOnly
-	    ifMultiple:aBlock
-    ].
-    ^ self filenameCompletionFor:aString directory:inDirectory directoriesOnly:directoriesOnly filesOnly:filesOnly ifMultiple:aBlock forMultipleDo:nil
+        ^ ConcreteClass
+            filenameCompletionFor:aString
+            directory:inDirectory
+            directoriesOnly:directoriesOnly
+            filesOnly:filesOnly
+            ifMultiple:aBlock
+    ].
+    ^ self 
+        filenameCompletionFor:aString 
+        directory:inDirectory 
+        directoriesOnly:directoriesOnly 
+        filesOnly:filesOnly 
+        ifMultiple:aBlock 
+        forMultipleDo:nil
+
+    "
+     self 
+        filenameCompletionFor:'/tm' 
+        directory:nil 
+        directoriesOnly:true 
+        filesOnly:false 
+        ifMultiple:[]
+    "
+
+    "Modified (comment): / 04-03-2019 / 15:43:52 / Claus Gittinger"
 !
 
 filenameCompletionFor:aString directory:inDirectory directoriesOnly:directoriesOnly filesOnly:filesOnly ifMultiple:aBlock forMultipleDo:aMultipleBlock