From 5b23c5d3baa15ca1200b2ee349b924c1d8395665 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 29 Feb 2016 12:04:48 -0400 Subject: use DelMeta to unset tag No behavior change, just simplification. --- Command/MetaData.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Command') diff --git a/Command/MetaData.hs b/Command/MetaData.hs index db1179701..1209a5836 100644 --- a/Command/MetaData.hs +++ b/Command/MetaData.hs @@ -46,7 +46,7 @@ optParser desc = MetaDataOptions ( long "tag" <> short 't' <> metavar "TAG" <> help "set a tag" )) - <|> (AddMeta tagMetaField . mkMetaValue (CurrentlySet False) <$> strOption + <|> (DelMeta tagMetaField . toMetaValue <$> strOption ( long "untag" <> short 'u' <> metavar "TAG" <> help "remove a tag" )) -- cgit v1.2.3