%!
% Setup to make a connection with the NeWS server with psexec.
systemdict begin
systemdict /psexec known not {
  ($1/term.ps) run
} if
/hookup {
  systemdict /hookfile currentfile put
  systemdict /hookproc currentprocess put
  {/Auto-CR true def
   64 0 500 200 reshape} psexec
} def

end % systemdict