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

fix: don't treat ExamBonusManual as override

Browse Source
This commit is contained in:
Gregor Kleen 2019-09-26 16:50:30 +02:00
parent 1cfd107aaf
commit 16abcd2265
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Exam/Users.hs
View File

@ -690,6 +690,8 @@ postEUsersR tid ssh csh examn = do
-> return () -> return ()
_ | is _Nothing newBonus _ | is _Nothing newBonus
-> return () -> return ()
_ | Just ExamBonusManual{} <- examBonusRule
-> yield $ ExamUserCsvSetBonusData False uid newBonus
Nothing Nothing
-> yield $ ExamUserCsvSetBonusData False uid newBonus -> yield $ ExamUserCsvSetBonusData False uid newBonus
Just _ Just _