From 9f1520038b991e9d37b53ce0a5bed4afdb3cb454 Mon Sep 17 00:00:00 2001
From: Saku Laesvuori <saku@laesvuori.fi>
Date: Wed, 31 Jan 2024 16:19:51 +0200
Subject: [PATCH] FIXUP Remove OwnProfile and OwnTokens scopes

---
 core/src/Datarekisteri/Core/Types.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/core/src/Datarekisteri/Core/Types.hs b/core/src/Datarekisteri/Core/Types.hs
index 48d4d42..0b256a5 100644
--- a/core/src/Datarekisteri/Core/Types.hs
+++ b/core/src/Datarekisteri/Core/Types.hs
@@ -82,9 +82,7 @@ renderDate (Date x) = toText $ iso8601Show x
 addTime :: NominalDiffTime -> Time -> Time
 addTime diff (Time time) = Time $ addUTCTime diff time
 
-data Scope = OwnProfile
-           | OwnTokens
-           | Profile UserID
+data Scope = Profile UserID
            | Tokens UserID
            | Members
            | Applications