diff options
| author | Scott Ostler <sostler@deathmachine.local> | 2010-02-14 22:36:53 -0500 |
|---|---|---|
| committer | Scott Ostler <sostler@deathmachine.local> | 2010-02-14 22:36:53 -0500 |
| commit | 42e70a1589e62bb222b1f270829bec031330e060 (patch) | |
| tree | 3402497b0d446b5ea8e64b4dc2b53760e3990388 /compojure-3.2 | |
| parent | 2de12cf972cf194b33155ed5b613590289eadfdc (diff) | |
Made mimetypes case-insensitive
Diffstat (limited to 'compojure-3.2')
| -rwxr-xr-x | compojure-3.2/src/compojure/http/middleware.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compojure-3.2/src/compojure/http/middleware.clj b/compojure-3.2/src/compojure/http/middleware.clj index f9a2dab..7c68bab 100755 --- a/compojure-3.2/src/compojure/http/middleware.clj +++ b/compojure-3.2/src/compojure/http/middleware.clj @@ -114,7 +114,7 @@ (let [default (or (:default options) "text/html")] (if-let [ext (extension (:uri request))] (let [mimetypes (or (:mimetypes options) default-mimetypes)] - (get mimetypes ext default)) + (get mimetypes (.toLowerCase ext) default)) default))) (defn with-mimetypes |