Removed dependency on Semigroup

This commit is contained in:
Burtannia 2020-11-17 22:12:59 +00:00
parent 5c56320c39
commit 0f51f91334

View File

@ -315,7 +315,7 @@ mhelperMulti field@Field {..} fs@FieldSettings {..} wrapperClass defs minVals Mu
|] |]
mkDelBtn fieldId = do mkDelBtn fieldId = do
let delBtnId = delBtnPrefix <> fieldId let delBtnId = delBtnPrefix `T.append` fieldId
[whamlet| [whamlet|
<button ##{delBtnId} .#{msDelClass} style="margin-left: 0.75rem" type="button"> <button ##{delBtnId} .#{msDelClass} style="margin-left: 0.75rem" type="button">
$maybe inner <- msDelInner $maybe inner <- msDelInner