FileServer: extend htaccess mime list

Author: paluh

src/Hyper/Node/FileServer.purs

@@ -24,44 +24,78 @@ import Node.FS.Stats (isDirectory, isFile)
 import Node.Path (FilePath)
 import Node.Path as Path
 
+
 htaccess :: Map String String
 htaccess = fromFoldable $
   [ Tuple "aab" "application/x-authorware-bin"
   , Tuple "aam" "application/x-authorware-map"
   , Tuple "aas" "application/x-authorware-seg"
+  , Tuple "asc" "text/plain"
   , Tuple "asf" "video/x-ms-asf"
   , Tuple "asp" "text/html"
   , Tuple "asx" "video/x-ms-asf"
+  , Tuple "avi" "application/octet-stream"
+  , Tuple "awk" "text/plain"
+  , Tuple "bash" "text/plain"
+  , Tuple "bsh" "text/plain"
+  , Tuple "bz2" "application/octet-stream"
+  , Tuple "c" "text/plain"
+  , Tuple "cgi" "text/plain"
+  , Tuple "chm" "application/octet-stream"
   , Tuple "class" "application/x-java-applet"
+  , Tuple "csh" "text/plain"
   , Tuple "css" "text/css"
+  , Tuple "csv" "application/vnd.ms-excel"
   , Tuple "dcr" "application/x-director"
   , Tuple "dir" "application/x-director"
   , Tuple "dmg" "application/octet-stream"
   , Tuple "dxr" "application/x-director"
+  , Tuple "exe" "application/octet-stream"
   , Tuple "fgd" "application/x-director"
   , Tuple "fh" "image/x-freehand"
   , Tuple "fh4" "image/x-freehand"
   , Tuple "fh5" "image/x-freehand"
   , Tuple "fh7" "image/x-freehand"
   , Tuple "fhc" "image/x-freehand"
+  , Tuple "flv" "video/x-flv"
+  , Tuple "gawk" "text/plain"
   , Tuple "gtar" "application/x-gtar"
   , Tuple "gz" "application/x-gzip"
+  , Tuple "h" "text/plain"
   , Tuple "ico" "image/vnd.microsoft.icon"
+  , Tuple "in" "text/plain"
+  , Tuple "ini" "text/plain"
   , Tuple "m3u" "audio/x-mpegurl"
+  , Tuple "md5" "text/plain"
+  , Tuple "mov" "application/octet-stream"
   , Tuple "mov" "video/quicktime"
+  , Tuple "mp4" "application/octet-stream"
+  , Tuple "mpg" "application/octet-stream"
+  , Tuple "msi" "application/octet-stream"
+  , Tuple "nawk" "text/plain"
+  , Tuple "pdb" "application/x-pilot"
   , Tuple "pdf" "application/pdf"
+  , Tuple "phps" "application/x-httpd-php-source"
+  , Tuple "pl" "text/plain"
+  , Tuple "prc" "application/x-pilot"
+  , Tuple "py" "text/plain"
   , Tuple "qt" "video/quicktime"
   , Tuple "ra" "audio/vnd.rn-realaudio"
   , Tuple "ram" "audio/vnd.rn-realaudio"
   , Tuple "rar" "application/x-rar-compressed"
   , Tuple "rm" "application/vnd.rn-realmedia"
   , Tuple "rpm" "audio/x-pn-realaudio-plugin"
   , Tuple "rv" "video/vnd.rn-realvideo"
+  , Tuple "sh" "text/plain"
+  , Tuple "sha" "text/plain"
+  , Tuple "sha1" "text/plain"
   , Tuple "shtml" "text/html"
   , Tuple "svg" "image/svg+xml"
   , Tuple "svgz" "image/svg+xml"
   , Tuple "swf" "application/x-shockwave-flash"
+  , Tuple "tgz" "application/octet-stream"
   , Tuple "torrent" "application/x-bittorrent"
+  , Tuple "var" "text/plain"
   , Tuple "wav" "audio/x-wav"
   , Tuple "wax" "audio/x-ms-wax"
   , Tuple "wm" "video/x-ms-wm"
@@ -73,7 +107,9 @@ htaccess = fromFoldable $
   , Tuple "wvx" "video/x-ms-wvx"
   , Tuple "xbm" "image/x-xbitmap"
   , Tuple "xhtml" "application/xhtml+xml"
+  , Tuple "xls" "application/octet-stream"
   , Tuple "xml" "text/xml"
+  , Tuple "xrdf" "application/xrds+xml"
   , Tuple "zip" "application/zip"
   ]