<target
  class="Target"
  name="quit-button"
  path="global/quit-button.tn0.xml"
><![CDATA[
Target
"quit-button"
{}
{ /ClientUp { 
    (\n.bye\n) callback
    {CP CF DL PileDict StampDict TargetDict RasterDict }
    {systemdict exch null put} forall
    [PileDict {exch pop} forall] {/Win get /destroy exch send} forall
    currentprocess killprocessgroup
  } def
  /ItemPath {rr} def }
]]></target>

