fair.
If you use the write block from the stage (alternatively, tell (my [stage V]) to {{write [] size (12)}$<> :: grey ring}$:>), it both follows all new lines, and it wraps text! It might be worth just using that.
Whoah! I had no idea. It doesn't have much flexibility, but it works great for a simple display. Thanks!