--- a/MIMETypes.st	Mon Jun 02 13:20:33 2008 +0200
+++ b/MIMETypes.st	Wed Jun 04 10:46:09 2008 +0200
@@ -65,6 +65,14 @@
 "
 !
 
+examples
+"
+    MIMETypes mimeTypeFromString:'application/x-expecco-testSuite' 
+
+    MIMETypes mimeTypeForSuffix:'gif'     
+"
+!
+
 knownTypes
 "
     simply a reminder for me ...
@@ -420,6 +428,8 @@
         ('a' 'o' 'obj' )                        'application/binary'
         'a'                                     'application/library'
         ('dll' 'so')                            'application/shared-library'
+
+        ('ets')                                 'application/x-expecco-testsuite'
     )
 !
 
@@ -768,6 +778,7 @@
 
     "
      self mimeTypeFromString:'image/gif' 
+     self mimeTypeFromString:'application/x-expecco-testSuite' 
     "
 !
 
@@ -1202,7 +1213,7 @@
 !MIMETypes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.91 2008-05-26 08:36:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.92 2008-06-04 08:46:09 cg Exp $'
 ! !
 
 MIMETypes initialize!