From 814c06a9a669dcb104b73f9800a9de3cc2347609 Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <sarah.vaupel@ifi.lmu.de>
Date: Fri, 28 Jan 2022 19:50:06 +0100
Subject: [PATCH] chore: fix tests

---
 test/Model/TypesSpec.hs | 1 +
 test/ModelSpec.hs       | 2 ++
 2 files changed, 3 insertions(+)

diff --git a/test/Model/TypesSpec.hs b/test/Model/TypesSpec.hs
index fad24d3f7..15e9377d5 100644
--- a/test/Model/TypesSpec.hs
+++ b/test/Model/TypesSpec.hs
@@ -298,6 +298,7 @@ instance Arbitrary CsvOptions where
   arbitrary = CsvOptions
     <$> arbitrary
     <*> arbitrary
+    <*> arbitrary
   shrink = genericShrink
 
 instance Arbitrary CsvPreset where
diff --git a/test/ModelSpec.hs b/test/ModelSpec.hs
index 66b90b480..27a5bed3f 100644
--- a/test/ModelSpec.hs
+++ b/test/ModelSpec.hs
@@ -128,6 +128,8 @@ instance Arbitrary User where
     userNotificationSettings <- arbitrary
     userCsvOptions <- arbitrary
     userShowSex <- arbitrary
+    userExamOfficeGetSynced <- arbitrary
+    userExamOfficeGetLabels <- arbitrary
 
     userCreated <- arbitrary
     userLastLdapSynchronisation <- arbitrary