fix(submissions): allow user to resolve themself for auth'stmt'
This commit is contained in:
parent
66f5e96eca
commit
5bbb86aa77
@ -181,6 +181,7 @@ makeSubmissionForm cid sheetEnt@(Entity shid _) msmid uploadMode grouping mPrev
|
||||
|
||||
prefillUsers' <- lift . lift . fmap catMaybes . for (Set.toList prefillUsers) $ \case
|
||||
Right uid' | doAuthorshipStatements
|
||||
, uid /= uid'
|
||||
-> fmap (Left . userEmail) <$> get uid'
|
||||
other -> return $ pure other
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user