diff --git a/test/Database/Fill.hs b/test/Database/Fill.hs
index bd02521e3..2db12951e 100644
--- a/test/Database/Fill.hs
+++ b/test/Database/Fill.hs
@@ -546,6 +546,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm True Summer
     , courseSchool = ifi
     , courseCapacity = Just 20
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Just $ termTime True Summer (-2) False Monday toMidnight
     , courseRegisterTo = Just $ termTime True Summer 0 True Sunday beforeMidnight
     , courseDeregisterUntil = Nothing
@@ -658,6 +660,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm False Winter
     , courseSchool = ifi
     , courseCapacity = Just 20
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Just $ termTime False Winter (-4) False Monday toMidnight
     , courseRegisterTo = Nothing
     , courseDeregisterUntil = Nothing
@@ -682,6 +686,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm True Summer
     , courseSchool = ifi
     , courseCapacity = Just 20
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Just $ termTime True Summer 0 False Monday toMidnight
     , courseRegisterTo = Just $ termTime True Summer (-2) True Sunday beforeMidnight
     , courseDeregisterUntil = Nothing
@@ -706,6 +712,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm True Winter
     , courseSchool = ifi
     , courseCapacity = Just 30
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Nothing
     , courseRegisterTo = Nothing
     , courseDeregisterUntil = Nothing
@@ -730,6 +738,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm True Summer
     , courseSchool = ifi
     , courseCapacity = Just 50
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Just $ termTime True Summer (-2) False Monday toMidnight
     , courseRegisterTo = Nothing
     , courseDeregisterUntil = Nothing
@@ -898,6 +908,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm False Winter
     , courseSchool = ifi
     , courseCapacity = Just 50
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Nothing
     , courseRegisterTo = Nothing
     , courseDeregisterUntil = Nothing
@@ -1028,6 +1040,8 @@ fillDb = do
     , courseTerm = TermKey $ seasonTerm False Winter
     , courseSchool = ifi
     , courseCapacity = Just 50
+    , courseVisibleFrom = Just now
+    , courseVisibleTo = Nothing
     , courseRegisterFrom = Nothing
     , courseRegisterTo = Nothing
     , courseDeregisterUntil = Nothing
@@ -1098,6 +1112,8 @@ fillDb = do
       , courseTerm = TermKey $ seasonTerm False Winter
       , courseSchool = ifi
       , courseCapacity = Just 50
+      , courseVisibleFrom = Just now
+      , courseVisibleTo = Nothing
       , courseRegisterFrom = Nothing
       , courseRegisterTo = Nothing
       , courseDeregisterUntil = Nothing
@@ -1153,6 +1169,8 @@ fillDb = do
       , courseTerm = TermKey $ seasonTerm False Winter
       , courseSchool = ifi
       , courseCapacity = Just cap
+      , courseVisibleFrom = Just now
+      , courseVisibleTo = Nothing
       , courseRegisterFrom = Nothing
       , courseRegisterTo = Nothing
       , courseDeregisterUntil = Nothing