maxsize overview display and --json support
This commit is contained in:
parent
016edcf437
commit
99514f9d18
8 changed files with 109 additions and 27 deletions
|
@ -10,9 +10,9 @@
|
|||
module Types.RepoSize where
|
||||
|
||||
-- The current size of a repo.
|
||||
newtype RepoSize = RepoSize Integer
|
||||
newtype RepoSize = RepoSize { fromRepoSize :: Integer }
|
||||
deriving (Show, Eq, Ord, Num)
|
||||
|
||||
-- The maximum size of a repo.
|
||||
newtype MaxSize = MaxSize Integer
|
||||
newtype MaxSize = MaxSize { fromMaxSize :: Integer }
|
||||
deriving (Show, Eq, Ord)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue