fix(build): hlint wants a newtype instead

2024-06-21 23:34:58 +02:00 · 2024-06-21 23:34:58 +02:00 · 07663516e5
commit 07663516e5
parent c04614ff86
1 changed files with 1 additions and 1 deletions
--- 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)