--- a/display.rc	Mon Jun 16 20:58:44 1997 +0200
+++ b/display.rc	Fri Jun 27 18:47:33 1997 +0200
@@ -78,21 +78,22 @@
 
 rdr := Smalltalk at:#WindowsIconReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'bmp'.
+    Image addReader:rdr suffix:'bmp' mimeType:'image/x-MS-bmp'.
     Image addReader:rdr suffix:'ico'.
 ].
 
 rdr := Smalltalk at:#JPEGReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'jpg'.
+    Image addReader:rdr suffix:'jpg' mimeType:'image/jpeg'.
     Image addReader:rdr suffix:'jpeg'.
 ].
 
 rdr := Smalltalk at:#PBMReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'ppm'.
-    Image addReader:rdr suffix:'pbm'.
-    Image addReader:rdr suffix:'pgm'.
+    Image addReader:rdr suffix:'ppm' mimeType:'image/x-portable-pixmap'.
+    Image addReader:rdr suffix:'pbm' mimeType:'image/x-portable-bitmap'.
+    Image addReader:rdr suffix:'pgm' mimeType:'image/x-portable-graymap'.
+    Image addReader:rdr suffix:'pnm' mimeType:'image/x-portable-anymap'.
 ].
 
 rdr := Smalltalk at:#ST80FormReader ifAbsent:nil.
@@ -107,23 +108,23 @@
 
 rdr := Smalltalk at:#XPMReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'xpm'.
+    Image addReader:rdr suffix:'xpm' mimeType:'image/x-xpixmap'.
     Image addReader:rdr suffix:'pm'.
 ].
 
 rdr := Smalltalk at:#PCXReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'pcx'.
+    Image addReader:rdr suffix:'pcx' mimeType:'image/x-pcx'.
 ].
 
 rdr := Smalltalk at:#TargaReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'tga'.
+    Image addReader:rdr suffix:'tga' mimeType:'image/x-targa'.
 ].
 
 rdr := Smalltalk at:#XWDReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'xwd'.
+    Image addReader:rdr suffix:'xwd' mimeType:'image/x-xwindowdump'.
 ].
 
 rdr := Smalltalk at:#BlitImageReader ifAbsent:nil.
@@ -133,19 +134,65 @@
 
 rdr := Smalltalk at:#IrisRGBReader ifAbsent:nil.
 rdr notNil ifTrue:[
-    Image addReader:rdr suffix:'rgb'.
+    Image addReader:rdr suffix:'rgb' mimeType:'image/x-rgb'.
 ].
 
+"/ experimanetal and not yet delivered
+
+"/ rdr := Smalltalk at:#PNGReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/     Image addReader:rdr suffix:'png' mimeType:'image/x-png'.
+"/ ].
+
+"/ rdr := Smalltalk at:#PCDReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/     Image addReader:rdr suffix:'pcd' mimeType:'image/x-photo-cd'.
+"/ ].
+
+"/ rdr := Smalltalk at:#CMURasterReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/     Image addReader:rdr suffix:'ras' mimeType:'image/x-cmu-raster'.
+"/ ].
+
 "/ movie formats - experimanetal and not yet complete
 
-"/ rdr := Smalltalk at:#FLIImageReader ifAbsent:nil.
+"/ rdr := Smalltalk at:#FLIMovieReader ifAbsent:nil.
 "/ rdr notNil ifTrue:[
 "/     Image addReader:rdr suffix:'fli'.
 "/ ].
 
-"/ rdr := Smalltalk at:#AVIImageReader ifAbsent:nil.
+"/ rdr := Smalltalk at:#AVIMovieReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/    Image addReader:rdr suffix:'avi' mimeType:'video/x-msvideo'.
+"/ ].
+
+"/ rdr := Smalltalk at:#QuickTimeMovieReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/    Image addReader:rdr suffix:'qt' mimeType:'video/quicktime'.
+"/    Image addReader:rdr suffix:'mov'.
+"/    Image addReader:rdr suffix:'moov'.
+"/ ].
+
+"/ rdr := Smalltalk at:#MPEG2MovieReader ifAbsent:nil.
 "/ rdr notNil ifTrue:[
-"/    Image addReader:rdr suffix:'avi'.
+"/    Image addReader:rdr suffix:'mpg2' mimeType:'video/x-mpeg2'.
+"/    Image addReader:rdr suffix:'mpv2'.
+"/    Image addReader:rdr suffix:'mp2v'.
+"/ ].
+
+"/ rdr := Smalltalk at:#MPEGMovieReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/    Image addReader:rdr suffix:'mpeg' mimeType:'video/mpeg'.
+"/    Image addReader:rdr suffix:'mpg'.
+"/    Image addReader:rdr suffix:'mpe'.
+"/    Image addReader:rdr suffix:'mpv'.
+"/    Image addReader:rdr suffix:'vbs'.
+"/    Image addReader:rdr suffix:'mpegv'.
+"/ ].
+
+"/ rdr := Smalltalk at:#SGIMovieReader ifAbsent:nil.
+"/ rdr notNil ifTrue:[
+"/    Image addReader:rdr suffix:'movie' mimeType:'video/x-sgi-movie'.
 "/ ].
 
 !