modified accepted types

This commit is contained in:
nek0 2014-12-03 23:30:42 +01:00
parent d6d79166f1
commit 689caaf993

View file

@ -120,4 +120,4 @@ removeItem x (y:ys)
| otherwise = y : removeItem x ys
acceptedTypes :: [T.Text]
acceptedTypes = ["image/jpeg", "image/png", "image/x-ms-bmp", "image/x-bmp", "image/bmp", "image/tiff", "image/tiff-fx"]
acceptedTypes = ["image/jpeg", "image/jpg", "image/png", "image/x-ms-bmp", "image/x-bmp", "image/bmp", "image/tiff", "image/tiff-fx"]