diff --git a/src/Handler/Corrections.hs b/src/Handler/Corrections.hs
index df5aad3eb..9fb3215e8 100644
--- a/src/Handler/Corrections.hs
+++ b/src/Handler/Corrections.hs
@@ -953,7 +953,7 @@ postCorrectionsCreateR = do
                 , submissionUserSubmission = subId
                 }
               forM_ spGroup $ \SheetPseudonym{sheetPseudonymUser} -> do
-                hoist (hoist lift) . queueDBJob . JobQueueNotification $ NotificationSubmissionUserCreated uid subId
+                hoist (hoist lift) . queueDBJob . JobQueueNotification $ NotificationSubmissionUserCreated sheetPseudonymUser subId
                 audit $ TransactionSubmissionUserEdit subId sheetPseudonymUser
               when (genericLength spGroup > maxSize) $
                 addMessageI Warning $ MsgSheetGroupTooLarge sheetGroupDesc
@@ -998,7 +998,7 @@ postCorrectionsCreateR = do
                 , submissionUserSubmission = subId
                 }
               forM_ spGroup $ \SheetPseudonym{sheetPseudonymUser} -> do
-                hoist (hoist lift) . queueDBJob . JobQueueNotification $ NotificationSubmissionUserCreated uid subId
+                hoist (hoist lift) . queueDBJob . JobQueueNotification $ NotificationSubmissionUserCreated sheetPseudonymUser subId
                 audit $ TransactionSubmissionUserEdit subId sheetPseudonymUser
               when (length spGroup > 1) $
                 addMessageI Warning $ MsgSheetNoGroupSubmission sheetGroupDesc