@@ -156,6 +156,7 @@ getMimeType f = M.lookup (map toLower $ drop 1 $ takeExtension f) mimeTypes
156 ,("fm","application/x-maker")
156 ,("fm","application/x-maker")
157 ,("frame","application/x-maker")
157 ,("frame","application/x-maker")
158 ,("frm","application/x-maker")
158 ,("frm","application/x-maker")
159+ ,("fs","text/plain")
159 ,("gal","chemical/x-gaussian-log")
160 ,("gal","chemical/x-gaussian-log")
160 ,("gam","chemical/x-gamess-input")
161 ,("gam","chemical/x-gamess-input")
161 ,("gamin","chemical/x-gamess-input")
162 ,("gamin","chemical/x-gamess-input")
@@ -443,6 +444,7 @@ getMimeType f = M.lookup (map toLower $ drop 1 $ takeExtension f) mimeTypes
443 ,("vms","chemical/x-vamas-iso14976")
444 ,("vms","chemical/x-vamas-iso14976")
444 ,("vrm","x-world/x-vrml")
445 ,("vrm","x-world/x-vrml")
445 ,("vrml","model/vrml")
446 ,("vrml","model/vrml")
447+ ,("vs","text/plain")
446 ,("vsd","application/vnd.visio")
448 ,("vsd","application/vnd.visio")
447 ,("wad","application/x-doom")
449 ,("wad","application/x-doom")
448 ,("wav","audio/x-wav")
450 ,("wav","audio/x-wav")