add test-user max@campus.lmu.de to fill-db.hs

2018-07-01 15:03:45 +02:00 · 2018-07-01 15:03:45 +02:00 · dc90f2718a
commit dc90f2718a
parent 12e52becbd
1 changed files with 9 additions and 0 deletions
--- 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