diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-02-29 12:04:48 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-02-29 13:00:23 -0400 |
| commit | 5b23c5d3baa15ca1200b2ee349b924c1d8395665 (patch) | |
| tree | 5e21313841bb80733867e45d30bf25a27429741f | |
| parent | 56a52ef8aaab05cc56955a2953e1eb3add535068 (diff) | |
use DelMeta to unset tag
No behavior change, just simplification.
| -rw-r--r-- | Command/MetaData.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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" )) |