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 | 699611cde5cda8b2f2d83a6d6ac9c1e575b74f51 (patch) | |
| tree | b502247490779aca8068684a3be42791050eff7b /Command/TestRemote.hs | |
| parent | bf5de3a6f3d50028f7ac47c6cde759a6f5110b08 (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/TestRemote.hs')
| -rw-r--r-- | Command/TestRemote.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/TestRemote.hs b/Command/TestRemote.hs index 75e438d79..1a5da42b2 100644 --- a/Command/TestRemote.hs +++ b/Command/TestRemote.hs @@ -58,7 +58,7 @@ seek o = commandAction $ start (fromInteger $ sizeOption o) (testRemote o) start :: Int -> RemoteName -> CommandStart start basesz name = do - showStart "testremote" name + showStart' "testremote" (Just name) fast <- Annex.getState Annex.fast r <- either giveup disableExportTree =<< Remote.byName' name rs <- catMaybes <$> mapM (adjustChunkSize r) (chunkSizes basesz fast) |