--- a/DirectoryContentsBrowser.st	Sun Oct 28 04:48:42 2018 +0100
+++ b/DirectoryContentsBrowser.st	Mon Oct 29 12:30:21 2018 +0100
@@ -3180,7 +3180,7 @@
             key := #directory.
         ] ifFalse:[
             self isSymbolicLink ifTrue:[
-                ((target := fileInfo targetPath asFilename) exists 
+                ((target := fileInfo linkTargetPath asFilename) exists 
                 and:[target isDirectory ]) ifTrue:[
                     key := #directoryLink
                 ] ifFalse:[
@@ -3194,6 +3194,7 @@
     ^ MIMETypeIconLibrary iconForKey:key.
 
     "Modified: / 25-10-2018 / 11:04:22 / Claus Gittinger"
+    "Modified: / 29-10-2018 / 12:28:55 / sr"
 !
 
 icon:anIcon