Wrap text in tags like pre when explicit width is set

When you have rich text in a Text element (and variations), text inside a tag like <pre> isn't wrapped. While this is can be considered expected behavior, since a <pre> tag contains pre-formatted text, this often leads to text leaving the bounds of Text element, often even leaving the window. I would expect there to be some kind of switch in Text-like components to wrap every text to be contained inside of it. This only seems to be an issue with Text.RichText, StyledText seems to actually wrap. Since I need to render text from external sources, like Reddit or other sites that format their comments as html, I need to currently replace every <pre> tag with <pre style="white-space: pre-wrap>, which is error prone and because I need some features not available in StyledText, I need to use RichText.

Example code:

import QtQuick 2.2

Text {
 width: 200
 wrapMode: Text.Wrap
 textFormat: Text.RichText
 text: "<pre>This is a very long text in a pre tag</pre>"
}

Could something be added to force the text content to respect the width specified or is that maybe even a bug in the rich text support?

Alternatively, is there a way to optionally add horizontal scrollbars, when a pre text makes the actual text wider than the specified width?

Thank you,
Nico