diff --git a/src/Handler/Admin/Crontab.hs b/src/Handler/Admin/Crontab.hs index 670d5ff3e..4f82a3c22 100644 --- a/src/Handler/Admin/Crontab.hs +++ b/src/Handler/Admin/Crontab.hs @@ -121,7 +121,7 @@ instance Finite JobTableAction nullaryPathPiece ''JobTableAction $ camelToPathPiece' 1 embedRenderMessage ''UniWorX ''JobTableAction id -data JobTableActionData = ActJobDeleteData +newtype JobTableActionData = ActJobDeleteData { jobDeleteLocked :: Bool } deriving (Eq, Ord, Read, Show, Generic)