From f17d1875c810ae5cff876100bc987855b08f95e2 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <kleen@cip.ifi.lmu.de>
Date: Wed, 21 Feb 2018 13:20:01 +0100
Subject: [PATCH] Fix fill-db.hs for new model

---
 fill-db.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/fill-db.hs b/fill-db.hs
index 8810d6aa5..41631aebb 100755
--- a/fill-db.hs
+++ b/fill-db.hs
@@ -30,7 +30,7 @@ main = db $ do
     , termHolidays = [fromGregorian 2017 12 24..fromGregorian 2018 01 06]
     , termLectureStart = fromGregorian 2017 10 16
     , termLectureEnd   = fromGregorian 2018 02 10
-    , termActive       = False
+    , termActive       = True
     }
   void . insert $ Term
     { termName     = summer2018
@@ -68,4 +68,4 @@ main = db $ do
   void . insert $ DegreeCourse ifiMsc ffp
   void . insert $ Lecturer gkleen ffp
   void . insert $ Corrector gkleen ffp (ByProportion 1)
-  void . insert $ Sheet ffp "Blatt 1" NotGraded Nothing now now Nothing Nothing now now gkleen gkleen
+  void . insert $ Sheet ffp "Blatt 1" Nothing NotGraded Nothing now now Nothing Nothing now now gkleen gkleen