Boolean/String union parsing results in wrong type

When we are presented with the following model:

module foo {
  leaf foo {
    type union {
      type boolean;
      type string;
    }
  }
}

we end up interpreting input string "TRUE" as a valid boolean and hence normalize it to the wrong value – and really end up transforming the value when transmitting it to wire, as we turn it into "true".