diff options
Diffstat (limited to 'Annex/MetaData.hs')
-rw-r--r-- | Annex/MetaData.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/MetaData.hs b/Annex/MetaData.hs index d8d8177c4..6642c3615 100644 --- a/Annex/MetaData.hs +++ b/Annex/MetaData.hs @@ -63,7 +63,7 @@ parseModMeta p = case lastMaybe f of Just '+' -> AddMeta <$> mkMetaField f' <*> v Just '-' -> DelMeta <$> mkMetaField f' <*> (Just <$> v) Just '?' -> MaybeSetMeta <$> mkMetaField f' <*> v - _ -> SetMeta <$> mkMetaField f <*> v + _ -> SetMeta <$> mkMetaField f <*> (S.singleton <$> v) where (f, sv) = separate (== '=') p f' = beginning f |