mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

whereis --json: Urls are now listed inside the remote that claims them, rather than all together at the end.

Browse source
This commit is contained in:
Joey Hess 2016-01-15 14:16:48 -04:00
parent d9f9153c82
commit b26ce646e4
Failed to extract signature
6 changed files with 59 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/Info.hs
View file

@ -425,7 +425,7 @@ reposizes_stats = stat desc $ nojson $ do
let maxlen = maximum (map (length . snd) l)
descm <- lift uuidDescriptions
-- This also handles json display.
s <- lift $ prettyPrintUUIDsWith (Just "size") desc descm $
s <- lift $ prettyPrintUUIDsWith (Just "size") desc descm (Just . show) $
map (\(u, sz) -> (u, Just $ mkdisp sz maxlen)) l
return $ countRepoList (length l) s
where