test: fix fakeUser
This commit is contained in:
parent
ea2e236012
commit
62e8c89161
@ -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
|
||||
|
||||
Loading…
Reference in New Issue
Block a user