From bd5f6ca5791ab62e7f0753e993e3455cfc9579ba Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Sun, 26 Dec 2010 12:32:24 +0100 Subject: UnknownFileType → Binary MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/Hakyll/Web/FileType.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Hakyll/Web/FileType.hs b/src/Hakyll/Web/FileType.hs index 8f0bdcc..9c1b681 100644 --- a/src/Hakyll/Web/FileType.hs +++ b/src/Hakyll/Web/FileType.hs @@ -23,7 +23,7 @@ data FileType | ReStructuredText | PlainText | Css - | UnknownFileType + | Binary deriving (Eq, Ord, Show, Read) -- | Get the file type for a certain file. The type is determined by extension. @@ -47,7 +47,7 @@ fileType = fileType' . takeExtension fileType' ".text" = PlainText fileType' ".txt" = PlainText fileType' ".css" = Css - fileType' _ = UnknownFileType + fileType' _ = Binary -- Treat unknown files as binary -- | Get the file type for the current file -- -- cgit v1.2.3