@@ 461,6 461,8 @@ define : guess-mime-type path
. 'application/octet-stream
: string-suffix? ".m3u" path
. 'application/x-mpegurl
+ : string-suffix? ".css" path
+ . 'text/css
: and (equal? mime-type 'text/plain) (string-suffix? ".js" path)
. 'application/javascript
: equal? mime-type 'video/x-matroska
@@ 469,7 471,7 @@ define : guess-mime-type path
define : charset mime-type
cond
- : member mime-type '(text/html text/plain application/x-mpegurl)
+ : member mime-type '(text/html text/css text/plain application/x-mpegurl)
. "UTF-8"
else "ISO-8859-1"