summaryrefslogtreecommitdiff
path: root/Annex/MetaData.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-02-25 18:45:09 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-02-25 18:45:09 -0400
commit425b6fca0046d6fb8ddd8a8a4f2bd77fef52c25d (patch)
treeeec260145fb8df2a8160e6dc3b248751878e381d /Annex/MetaData.hs
parent7b15c2146cb3fcb60a95dd6df435b34bd97e39db (diff)
metadata: FIeld names are now case insensative.
Diffstat (limited to 'Annex/MetaData.hs')
-rw-r--r--Annex/MetaData.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Annex/MetaData.hs b/Annex/MetaData.hs
index b7850a868..68aef33f1 100644
--- a/Annex/MetaData.hs
+++ b/Annex/MetaData.hs
@@ -20,13 +20,13 @@ import Data.Time.Clock
import Data.Time.Clock.POSIX
tagMetaField :: MetaField
-tagMetaField = MetaField "tag"
+tagMetaField = mkMetaFieldUnchecked "tag"
yearMetaField :: MetaField
-yearMetaField = MetaField "year"
+yearMetaField = mkMetaFieldUnchecked "year"
monthMetaField :: MetaField
-monthMetaField = MetaField "month"
+monthMetaField = mkMetaFieldUnchecked "month"
{- Adds metadata for a file that has just been ingested into the
- annex, but has not yet been committed to git.