@@ -23,7 +23,7 @@ data FileType
2323 | ReStructuredText
2424 | PlainText
2525 | Css
26− | UnknownFileType
26+ | Binary
2727 deriving (Eq, Ord, Show, Read)
2828
2929-- | Get the file type for a certain file. The type is determined by extension.
@@ -47,7 +47,7 @@ fileType = fileType' . takeExtension
4747 fileType' ".text" = PlainText
4848 fileType' ".txt" = PlainText
4949 fileType' ".css" = Css
50− fileType' _ = UnknownFileType
50+ fileType' _ = Binary -- Treat unknown files as binary
5151
5252-- | Get the file type for the current file
5353--