diff --git a/src/Vervis/Persist.hs b/src/Vervis/Persist.hs
index b45bd35..39b0e0c 100644
--- a/src/Vervis/Persist.hs
+++ b/src/Vervis/Persist.hs
@@ -39,28 +39,47 @@ share [mkPersist sqlSettings, mkMigrate "migrateAll"] [persistLowerCase|
 IrcChannel
     network Text
     name    Text
-User
+
+Sharer
     ident Text       --CI
-    hash  Text Maybe
     name  Text Maybe
-    email Text Maybe
+
+    UniqueIdent ident
+
+Person
+    ident SharerId
+    hash  Text     Maybe
+    email Text     Maybe
+
+    UniquePersonIdent ident
+
 Group
-    ident Text       --CI
-    name  Text Maybe
-Repo
-    name  Text       --CI
-    irc   IrcChannelId Maybe
-    ml    Text         Maybe
+    ident SharerId
+
+    UniqueGroupIdent ident
+
 Project
-    ident Text       --CI
-    name  Text Maybe
-    desc  Text Maybe
+    ident  Text       --CI
+    sharer SharerId
+    name   Text     Maybe
+    desc   Text     Maybe
 
-UserInGroup
-    user  UserId
-    group GroupId
+    UniqueProject ident sharer
 
-RepoInProject
-    repo    RepoId
+Repo
+    name    Text       --CI
     project ProjectId
+    irc     IrcChannelId Maybe
+    ml      Text         Maybe
+
+    UniqueRepo name project
+
+PersonInGroup
+    person PersonId
+    group  GroupId
+
+    UniquePersonInGroup person group
+
 |]
+
+--mainViewQuery = --TODO