summaryrefslogtreecommitdiff
path: root/Types/FileMatcher.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2016-02-03 16:58:36 -0400
committerJoey Hess <joeyh@joeyh.name>2016-02-03 16:58:36 -0400
commit23cc315c38842c993fb1888e9426ef9826134945 (patch)
tree7117b53df2e00de94b2d70796a0a3e99abb94517 /Types/FileMatcher.hs
parent5127cb59ccb51422ec4f07ccc7dd790aa7d9a0eb (diff)
matchexpression: Added --largefiles option to parse an annex.largefiles expression.
Diffstat (limited to 'Types/FileMatcher.hs')
-rw-r--r--Types/FileMatcher.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/Types/FileMatcher.hs b/Types/FileMatcher.hs
index be7ac97bd1..ecf4fbbd8b 100644
--- a/Types/FileMatcher.hs
+++ b/Types/FileMatcher.hs
@@ -19,7 +19,9 @@ import qualified Data.Set as S
data MatchInfo
= MatchingFile FileInfo
| MatchingKey Key
- | MatchingInfo (OptInfo FilePath) (OptInfo Key) (OptInfo FileSize)
+ | MatchingInfo (OptInfo FilePath) (OptInfo Key) (OptInfo FileSize) (OptInfo MimeType)
+
+type MimeType = String
data FileInfo = FileInfo
{ currFile :: FilePath