diff options
Diffstat (limited to 'Command/MetaData.hs')
| -rw-r--r-- | Command/MetaData.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Command/MetaData.hs b/Command/MetaData.hs index d10fc9921..f3a39dee9 100644 --- a/Command/MetaData.hs +++ b/Command/MetaData.hs @@ -64,6 +64,10 @@ optParser desc = MetaDataOptions ( long "remove" <> short 'r' <> metavar "FIELD" <> help "remove all values of a field" ) + <|> flag' DelAllMeta + ( long "remove-all" + <> help "remove all metadata" + ) seek :: MetaDataOptions -> CommandSeek seek o = case batchOption o of |