From dc90f2718a9e7f08cacf916f6c1b789acf978708 Mon Sep 17 00:00:00 2001 From: Felix Hamann Date: Sun, 1 Jul 2018 15:03:45 +0200 Subject: [PATCH] add test-user max@campus.lmu.de to fill-db.hs --- fill-db.hs | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/fill-db.hs b/fill-db.hs index 81a805011..812b8fa7c 100755 --- a/fill-db.hs +++ b/fill-db.hs @@ -45,6 +45,15 @@ main = db $ do , userMaxFavourites = 14 , userTheme = MossGreen } + void . insert $ User + { userPlugin = "LDAP" + , userIdent = "max@campus.lmu.de" + , userMatrikelnummer = Nothing + , userEmail = "max@campus.lmu.de" + , userDisplayName = "Max Musterstudent" + , userMaxFavourites = 7 + , userTheme = AberdeenReds + } void . insert $ Term { termName = summer2017 , termStart = fromGregorian 2017 04 09