diff options
| author | Joey Hess <joeyh@joeyh.name> | 2017-11-28 14:40:26 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-11-28 15:14:16 -0400 |
| commit | 4781ca297bff999e840ed65441ef28aedb7e2309 (patch) | |
| tree | f077303a093febefb478bef07842da066d4a285b /Command/MetaData.hs | |
| parent | d6d8f7295787429cd0733dc7328b8fd40028b598 (diff) | |
showStart variant for when there's no worktree file
Clean up some uses of showStart with "" for the file,
or in some cases, a non-filename description string. That would
generate bad json, although none of the commands doing that
supported --json.
Using "" for the file resulted in output like "foo rest";
now the extra space is eliminated.
This commit was sponsored by Fernando Jimenez on Patreon.
Diffstat (limited to 'Command/MetaData.hs')
| -rw-r--r-- | Command/MetaData.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/MetaData.hs b/Command/MetaData.hs index fd5fd0838e..9fba1097a6 100644 --- a/Command/MetaData.hs +++ b/Command/MetaData.hs @@ -100,7 +100,7 @@ startKeys c o k ai = case getSet o of putStrLn . fromMetaValue stop _ -> do - showStart' "metadata" k ai + showStartKey "metadata" k ai next $ perform c o k perform :: VectorClock -> MetaDataOptions -> Key -> CommandPerform @@ -164,7 +164,7 @@ startBatch (i, (MetaData m)) = case i of Right k -> go k (mkActionItem k) where go k ai = do - showStart' "metadata" k ai + showStartKey "metadata" k ai let o = MetaDataOptions { forFiles = [] , getSet = if MetaData m == emptyMetaData |