let action attrs content =
  H.button
    (Js.Array.concat attrs [| HA.class_ "g-Button__Action" |])
    content

let cancel attrs content =
  H.button
    (Js.Array.concat attrs [| HA.class_ "g-Button__Cancel" |])
    content