diff options
Diffstat (limited to 'tissue/web/server.scm')
| -rw-r--r-- | tissue/web/server.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tissue/web/server.scm b/tissue/web/server.scm index db89bae..e8ee9eb 100644 --- a/tissue/web/server.scm +++ b/tissue/web/server.scm @@ -72,7 +72,9 @@ (define (mime-type-for-extension extension) "Return the mime type for @var{extension}." - (or (assoc-ref %mime-types (string-remove-prefix "." extension)) + (or (assoc-ref %mime-types (if (string-null? extension) + extension + (string-remove-prefix "." extension))) '(application/octet-stream))) (define (404-response request) |