RichText with WordWrap uses small width

import QtQuick 2.9
import QtQuick.Window 2.2

Window {
  visible: true
  width: 640
  height: 480
  title: qsTr("RichText Wrap")

  // Rich Text, Word Wrap, and no explicit width causes line breaks and small text width
  Text {
    text: "This is a rich and wrapped text"

    wrapMode: Text.WordWrap
    textFormat: Text.RichText
  }
}