Window label as Text instead of String bugs

‘Text’ asMorph openInWindowLabeled: ‘Text’ asText

Trying to open the debugger halo on the resulting window results in a MNU
Text>>truncateWithElipsisTo: in HaloMorph>>doDebug:with:  

It needs either an asString there, or an implementation in Text

Trying to grab the window results in a MNU Text>>truncateTo:
in SystemWindow>>nameForUndoWording that needs a similar change

Stephan