diff options
author | Joey Hess <joey@kitenet.net> | 2012-10-08 15:18:58 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-10-08 15:18:58 -0400 |
commit | c452c70ef88197b152c1552563daa6a79e88e91f (patch) | |
tree | 27b2031fdb79d183a8abef7ca837cb25a0ecd3a0 /Types/Group.hs | |
parent | 1ccd0ed1e6541534626673dc5dbdd97c9ab9ca49 (diff) |
add --ingroup limit
Diffstat (limited to 'Types/Group.hs')
-rw-r--r-- | Types/Group.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Types/Group.hs b/Types/Group.hs index 564e75d0f..88bc35207 100644 --- a/Types/Group.hs +++ b/Types/Group.hs @@ -7,7 +7,8 @@ module Types.Group ( Group, - GroupMap(..) + GroupMap(..), + emptyGroupMap ) where import Types.UUID @@ -21,3 +22,6 @@ data GroupMap = GroupMap { groupsByUUID :: M.Map UUID (S.Set Group) , uuidsByGroup :: M.Map Group (S.Set UUID) } + +emptyGroupMap :: GroupMap +emptyGroupMap = GroupMap M.empty M.empty |