diff --git a/Yesod/Contrib/Crud.hs b/Yesod/Contrib/Crud.hs index 2d1cb1dd..0dea88d0 100644 --- a/Yesod/Contrib/Crud.hs +++ b/Yesod/Contrib/Crud.hs @@ -105,6 +105,7 @@ getCrudDeleteR s = do applyLayout "Confirm delete" mempty [$hamlet| %form!method=post!action=@toMaster.CrudDeleteR.s@ %h1 Really delete? + %p Do you really want to delete $cs.itemTitle.item$? %p %input!type=submit!value=Yes \