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

use "known" instead of "visible"

Browse source 
I think it's clearer, also it's the same length as "local" :)
This commit is contained in:
Joey Hess 2012-02-06 14:19:44 -04:00
parent a6c4b10771
commit a81297065d
1 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
Command/Status.hs
View file

@ -66,8 +66,8 @@ slow_stats =
, bad_data_size , bad_data_size
, local_annex_keys , local_annex_keys
, local_annex_size , local_annex_size
, visible_annex_keys , known_annex_keys
, visible_annex_size , known_annex_size
, backend_usage , backend_usage
] ]
@ -128,12 +128,12 @@ local_annex_keys :: Stat
local_annex_keys = stat "local annex keys" $ json show $ local_annex_keys = stat "local annex keys" $ json show $
S.size <$> cachedKeysPresent S.size <$> cachedKeysPresent
visible_annex_size :: Stat known_annex_size :: Stat
visible_annex_size = stat "visible annex size" $ json id $ known_annex_size = stat "known annex size" $ json id $
keySizeSum <$> cachedKeysReferenced keySizeSum <$> cachedKeysReferenced
visible_annex_keys :: Stat known_annex_keys :: Stat
visible_annex_keys = stat "visible annex keys" $ json show $ known_annex_keys = stat "known annex keys" $ json show $
S.size <$> cachedKeysReferenced S.size <$> cachedKeysReferenced
tmp_size :: Stat tmp_size :: Stat