--- a/PCFilename.st	Mon Jan 21 17:25:28 2019 +0100
+++ b/PCFilename.st	Mon Jan 21 18:02:29 2019 +0100
@@ -925,17 +925,17 @@
 osNameForDirectory
     "special - return the OS's name for the receiver to
      access it as a directory.
-     Care remove trailing backSlashes here and to use the shortName
-     if available"
+     Care remove trailing backSlashes here."
 
     |n|
 
     n := self osNameForFile.
 
     (n endsWith:'\') ifTrue:[
-	((n size == 3) and:[(n at:2) == $:]) ifFalse:[
-	    n := n copyButLast:1
-	]
+        ((n size == 3) and:[(n at:2) == $:]) ifFalse:[
+            "keep \ in c:\"
+            n := n copyButLast:1
+        ]
     ].
 "/    i := OperatingSystem infoOf:n.
 "/    (i notNil and:[(shortName := i alternativeName) notNil]) ifTrue:[
@@ -943,8 +943,9 @@
 "/    ].
     ^ n
 
-    "Modified: / 20.1.1998 / 15:39:06 / md"
-    "Modified: / 17.8.1998 / 10:04:01 / cg"
+    "Modified: / 20-01-1998 / 15:39:06 / md"
+    "Modified: / 17-08-1998 / 10:04:01 / cg"
+    "Modified (comment): / 21-01-2019 / 16:04:49 / Stefan Vogel"
 !
 
 osNameForDirectoryContents