--- a/MIMETypeIconLibrary.st	Mon Oct 22 13:15:47 2018 +0200
+++ b/MIMETypeIconLibrary.st	Thu Oct 25 11:07:46 2018 +0200
@@ -305,6 +305,15 @@
 
 iconForKey:mimeTypeOrKey
     ^ self icons at:mimeTypeOrKey ifAbsent:nil.
+
+    "
+     self iconForKey:#file
+     self iconForKey:#directory
+     self iconForKey:#fileLink
+     self iconForKey:#directoryLink
+    "
+
+    "Modified (comment): / 25-10-2018 / 11:07:14 / Claus Gittinger"
 !
 
 iconForKeyMatching:mimeTypeOrKey