From 5525369a4a98ff57f157842106f4adbbe1514d1b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Thu, 25 Oct 2012 17:21:14 +0200 Subject: Mimetype lookup expects lowercase extensions We handle extensions in a case-insensitive manner when looking for a mimetype for a file. Extensions are thus lowered. --- src/cowboy_static.erl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cowboy_static.erl b/src/cowboy_static.erl index 3b63afe..724bf33 100644 --- a/src/cowboy_static.erl +++ b/src/cowboy_static.erl @@ -451,7 +451,7 @@ path_to_mimetypes(Filepath, Extensions) when is_binary(Filepath) -> -spec path_to_mimetypes_(binary(), [{binary(), [mimedef()]}]) -> [mimedef()]. path_to_mimetypes_(Ext, Extensions) -> - case lists:keyfind(Ext, 1, Extensions) of + case lists:keyfind(cowboy_bstr:to_lower(Ext), 1, Extensions) of {_, MTs} -> MTs; _Unknown -> default_mimetype() end. -- cgit v1.2.3