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

display ">100%" when past maxsize

Browse source 
This is to avoid a value like 1000% causing the table to not align.
This commit is contained in:
Joey Hess 2024-08-21 20:52:54 -04:00
parent 76ece2a699
commit a643699b7b
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Command/MaxSize.hs
View file

@ -98,7 +98,7 @@ sizeOverview o = do
(widths, headers) = unzip (widths, headers) = unzip
[ (7, "size") [ (7, "size")
, (7, "maxsize") , (7, "maxsize")
, (5, "%full") , (6, "%full")
, (0, "repository") , (0, "repository")
] ]
@ -109,9 +109,11 @@ sizeOverview o = do
[ formatsize size [ formatsize size
, formatsize maxsize , formatsize maxsize
, case (size, maxsize) of , case (size, maxsize) of
(Just size', Just maxsize') -> (Just size', Just maxsize')
showPercentage 0 $ | size' <= maxsize' ->
percentage maxsize' size' showPercentage 0 $
percentage maxsize' size'
| otherwise -> ">100%"
_ -> "" _ -> ""
, "" , ""
] ]