Merge pull request #146 from ilyakooo0/develop
Update faculties on launch
commit4a18fd99850875a70d113f229a20faf55321b9b5
authoriko <ilyakooo0@gmail.com>
dateTue 14 May 2019, 11:19 (7 years ago)
parent2733d302dc9cf2
denis/src/Server/Server.hs+1
@@ -63,6 +63,7 @@ runServer :: IO ()
6363runServer = do
6464 port <- getServerPort
6565 cfg <- getConfig
66+ updateFaculties cfg
6667 _ <- periodically (1 * hours) $ updateFaculties cfg
6768 _ <- periodically (20 * minutes) $ runDbTask cfg pruneAuth
6869 let ctx = genAuthServerContext $ getPool cfg