diff --git a/src/Model/Types/Submission.hs b/src/Model/Types/Submission.hs index 676b64776..3855ef5a9 100644 --- a/src/Model/Types/Submission.hs +++ b/src/Model/Types/Submission.hs @@ -149,7 +149,7 @@ data AuthorshipStatementSubmissionState deriving (Eq, Read, Show, Enum, Bounded, Generic, Typeable) deriving anyclass (Universe, Finite) -deriving stock instance Ord AuthorshipStatementSubmissionState -- ^ Larger roughly encodes better; summaries are taken with `max` +deriving stock instance Ord AuthorshipStatementSubmissionState -- Larger roughly encodes better; summaries are taken with max nullaryPathPiece ''AuthorshipStatementSubmissionState $ camelToPathPiece' 1 pathPieceCsv ''AuthorshipStatementSubmissionState