From c8fcb6a06f70338fb3fbd121c32f34dce181a362 Mon Sep 17 00:00:00 2001 From: Sarah Vaupel Date: Thu, 29 Aug 2019 12:59:08 +0200 Subject: [PATCH] chore(audit): audit submissions without group --- src/Handler/Corrections.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Handler/Corrections.hs b/src/Handler/Corrections.hs index 20c1f5546..72472302a 100644 --- a/src/Handler/Corrections.hs +++ b/src/Handler/Corrections.hs @@ -965,6 +965,7 @@ postCorrectionsCreateR = do { submissionUserUser = sheetPseudonymUser , submissionUserSubmission = subId } + audit $ TransactionSubmissionEdit subId uid when (length spGroup > 1) $ addMessageI Warning $ MsgSheetNoGroupSubmission sheetGroupDesc when allDone $