fraport/fradrive
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix(lms): negate learner locking condition

Browse Source
This commit is contained in:
Steffen Jost 2023-08-30 07:44:38 +00:00
parent 172b5086dc
commit a452b032c4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Utils/LMS.hs
View File

@ -161,7 +161,7 @@ lmsUserToResetTries LmsUser{..} = lmsUserResetTries && lmsUserLocked &&
-- | Answers "Should the LMS lock a user out?" -- | Answers "Should the LMS lock a user out?"
-- Note that LmsUserLocked only logs the current LMS state, not what it should be. -- Note that LmsUserLocked only logs the current LMS state, not what it should be.
lmsUserToLock :: LmsUser -> Bool lmsUserToLock :: LmsUser -> Bool
lmsUserToLock LmsUser{..} = isNothing lmsUserStatus -- only open LMS should be accessible lmsUserToLock LmsUser{..} = isJust lmsUserStatus -- only open LMS should be accessible
lmsUserStaff :: LmsUser -> Bool lmsUserStaff :: LmsUser -> Bool
lmsUserStaff = const False -- legacy, currently ignored lmsUserStaff = const False -- legacy, currently ignored