Resize TextMorph to contained text

Hi,

I'm looking for a possibility to automatically resize a TextMorph to the contained text.
Is this functionality already available? If not, how would I go about coding it?

Best Regards,
Philipp Otto