From 38cb6b48653f950092e6cd6cd2332eec3f77e667 Mon Sep 17 00:00:00 2001
From: Hannes Schulze <contact@haschu.me>
Date: Sun, 4 Oct 2026 03:38:43 +0200
Subject: persistence api

---
 src/Settlr/Cookies.hs | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 src/Settlr/Cookies.hs

(limited to 'src/Settlr/Cookies.hs')

diff --git a/src/Settlr/Cookies.hs b/src/Settlr/Cookies.hs
new file mode 100644
index 0000000..56c645d
--- /dev/null
+++ b/src/Settlr/Cookies.hs
@@ -0,0 +1,26 @@
+module Settlr.Cookies
+  ( SavedGroup(..)
+  , getSavedGroups
+  , getSavedGroupSelf
+  , addGroup
+  , removeGroup
+  ) where
+import Settlr.Scripts (ScriptM)
+import Settlr.Storage (Group, Member)
+
+data SavedGroup = SavedGroup
+  { savGroupID :: !Group
+  , savSelf    :: !Member
+  }
+
+getSavedGroups :: ScriptM [SavedGroup]
+getSavedGroups = undefined
+
+getSavedGroupSelf :: Group -> ScriptM (Maybe Member)
+getSavedGroupSelf = undefined
+
+addGroup :: Group -> Member -> ScriptM ()
+addGroup = undefined
+
+removeGroup :: Group -> ScriptM ()
+removeGroup = undefined
-- 
cgit v1.3.1