diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-02 13:45:30 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-02 13:45:30 -0400 |
| commit | ab39433a9523f9f8a9f8c561a46b38863c0f541d (patch) | |
| tree | eddfc683d72b27e1c64a57cfdde71449c06d7651 /Types/Group.hs | |
| parent | 3dfe4819b992b5486f5bca5fda9f64c7b3ed24a6 (diff) | |
status: display repository groups
Diffstat (limited to 'Types/Group.hs')
| -rw-r--r-- | Types/Group.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/Types/Group.hs b/Types/Group.hs index dd06cbfd7..564e75d0f 100644 --- a/Types/Group.hs +++ b/Types/Group.hs @@ -7,7 +7,7 @@ module Types.Group ( Group, - GroupMap + GroupMap(..) ) where import Types.UUID @@ -17,4 +17,7 @@ import qualified Data.Set as S type Group = String -type GroupMap = M.Map UUID (S.Set Group) +data GroupMap = GroupMap + { groupsByUUID :: M.Map UUID (S.Set Group) + , uuidsByGroup :: M.Map Group (S.Set UUID) + } |