home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1997 April / dpcb0497.iso / Business / XRES / DATA.Z / ENCODING.PS < prev    next >
Text File  |  1995-07-29  |  805b  |  30 lines
  1. %!
  2. %%VMusage: 4720 4720
  3. %%VMlocation: global
  4. %%
  5. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  6. %%                                    %%
  7. %% This file implements the Encoding category resource.            %%
  8. %%                                    %%
  9. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  10.  
  11. /Generic /Category findresource
  12. dup length 2 add dict copy
  13. dup /InstanceType /arraytype put
  14. dup /Category /Encoding put
  15. %%
  16. %% This ugly hack required for FontWorks fonts that explicitly
  17. %% store resources in EncodingDirectory
  18. %%
  19. dup /LocalInstances {
  20.   userdict /EncodingDirectory known not {
  21.     userdict /EncodingDirectory
  22.     currentglobal false setglobal 1 dict exch setglobal
  23.     put
  24.   } if
  25.   userdict /EncodingDirectory get
  26. } bind put
  27.  
  28. /Encoding exch /Category defineresource pop
  29.  
  30.