diff --git a/src/Utils/Form.hs b/src/Utils/Form.hs
index ec42373ad..b10f0e010 100644
--- a/src/Utils/Form.hs
+++ b/src/Utils/Form.hs
@@ -301,7 +301,7 @@ combinedButtonField_ :: forall a m.
                       , RenderMessage (HandlerSite m) ButtonMessage
                       , MonadHandler m
                       ) => [a] -> FieldSettings (HandlerSite m) -> AForm m ()
-combinedButtonField_ bs fs = void . disambiguateButtons $ combinedButtonField bs fs
+combinedButtonField_ = (void .) . combinedButtonField
 
 combinedButtonFieldF_ :: forall m a p.
                        ( Button (HandlerSite m) a
@@ -310,7 +310,7 @@ combinedButtonFieldF_ :: forall m a p.
                        , MonadHandler m
                        , Finite a
                        ) => p a -> FieldSettings (HandlerSite m) -> AForm m ()
-combinedButtonFieldF_ _ fs = void . disambiguateButtons $ combinedButtonFieldF @m @a fs
+combinedButtonFieldF_ _ = void . combinedButtonFieldF @m @a
 
 submitButton :: (Button (HandlerSite m) SubmitButton, Show (ButtonCssClass (HandlerSite m)), MonadHandler m, RenderMessage (HandlerSite m) ButtonMessage) => AForm m ()
 submitButton = combinedButtonFieldF_ (Proxy @SubmitButton) ""