home *** CD-ROM | disk | FTP | other *** search
/ CorelDRAW! 10 / cd10_pgrm.iso / Corel / Graphics10 / Programs / Data / trap100.ps < prev    next >
Encoding:
Text File  |  2000-09-05  |  337 b   |  6 lines
  1. 1 dict/wCorel10TrapDict exch def wCorel10TrapDict begin/CorelSetTrapParams{
  2. /Trapping/ProcSet resourcestatus{pop pop/Trapping/ProcSet findresource begin
  3. settrapparams end}{pop}ifelse}bind def/CorelSetTrapZone{/Trapping/ProcSet
  4. resourcestatus{pop pop/Trapping/ProcSet findresource begin settrapzone end}{
  5. newpath}ifelse}bind def end
  6.