From 5111cd9bc7acc33fc600fdae9caefe2ee99f9c78 Mon Sep 17 00:00:00 2001
From: fr33domlover <fr33domlover@riseup.net>
Date: Mon, 3 Jun 2019 11:01:21 +0000
Subject: [PATCH] Forgot to record this line of code when renamed ProjectRole
 entity to Role

---
 src/Vervis/Access.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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