diff --git a/yesod-form-multi/Yesod/Form/MultiInput.hs b/yesod-form-multi/Yesod/Form/MultiInput.hs index 70f39d96..07581ae3 100644 --- a/yesod-form-multi/Yesod/Form/MultiInput.hs +++ b/yesod-form-multi/Yesod/Form/MultiInput.hs @@ -315,7 +315,7 @@ mhelperMulti field@Field {..} fs@FieldSettings {..} wrapperClass defs minVals Mu |] mkDelBtn fieldId = do - let delBtnId = delBtnPrefix <> fieldId + let delBtnId = delBtnPrefix `T.append` fieldId [whamlet|