test: fix fakeUser

This commit is contained in:
Gregor Kleen 2020-01-29 21:01:24 +01:00
parent ea2e236012
commit 62e8c89161

View File

@ -29,12 +29,16 @@ fakeUser adjUser = adjUser User{..}
userTitle = Nothing
userTheme = userDefaultTheme
userMaxFavourites = userDefaultMaxFavourites
userMaxFavouriteTerms = userDefaultMaxFavouriteTerms
userDateTimeFormat = userDefaultDateTimeFormat
userDateFormat = userDefaultDateFormat
userTimeFormat = userDefaultTimeFormat
userDownloadFiles = userDefaultDownloadFiles
userLanguages = Nothing
userWarningDays = userDefaultWarningDays
userMailLanguages = def
userCsvOptions = def
userSex = Nothing
userShowSex = userDefaultShowSex
userNotificationSettings = def
userCreated = unsafePerformIO getCurrentTime
userLastLdapSynchronisation = Nothing