diff --git a/src/Vervis/Access.hs b/src/Vervis/Access.hs
index f341663..87385e1 100644
--- a/src/Vervis/Access.hs
+++ b/src/Vervis/Access.hs
@@ -79,7 +79,7 @@ data ObjectAccessStatus =
     NoSuchObject | ObjectAccessDenied | ObjectAccessAllowed
         deriving Eq
 
-data PersonRole = Developer | User | Guest | RoleID ProjectRoleId
+data PersonRole = Developer | User | Guest | RoleID RoleId
 
 roleHasAccess
     :: MonadIO m