TextEditTarget
"unlabled-text"
{ (HOME) getenv (/) append
  /Right
  {} }
{ /ItemLabel () def }