diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-02-03 16:58:36 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-02-03 16:58:36 -0400 |
| commit | 1ddffd6a8a62491684c6565be9c5c329507fe623 (patch) | |
| tree | 3d0755a355d6609ca9664dfd69edf130f2716d2a /Types | |
| parent | 590d47ed764c88a08f615c3af057cbff26633bc1 (diff) | |
matchexpression: Added --largefiles option to parse an annex.largefiles expression.
Diffstat (limited to 'Types')
| -rw-r--r-- | Types/FileMatcher.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Types/FileMatcher.hs b/Types/FileMatcher.hs index be7ac97bd..ecf4fbbd8 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 |