JSX: disabled should accept true/false instead of `unit`

Given this code:

<button disabled={()}> "my button" </button>

To have a button that isn't disabled, I have to duplicate the code logic or use pure function syntax instead of doing it directly in JSX syntax.

Update: This is a very awkward Button component that were written to allow this:

module Button = {
  open Tyxml.Html;
  let createElement = (~title=?, ~cls=?, ~disabled=?, ~children, ()) => {
    let a = {
      let or_append = (value, cb, attrs) => {
        switch (value) {
        | None => attrs
        | Some(value) => [cb(value), ...attrs]
        };
      };
      let attrs = [];
      let attrs =
        attrs
        |> or_append(title, title => a_title(title))
        |> or_append(cls, cls => a_class(cls));
      let attrs =
        switch (disabled) {
        | Some(true) => [a_disabled(), ...attrs]
        | Some(false)
        | None => attrs
        };
      attrs;
    };
    button(~a, children);
  };
};

Start by tracing how JSX attributes reach Tyxml.Html, using the disabled attribute in the issue and the Button.createElement example as entry points. Determine where disabled currently accepts unit and how boolean values should map to the generated attribute. Done means JSX accepts true/false without duplicated component logic and preserves the enabled-button behavior.