home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1997 August / Personal_Computer_World_Aug_97.iso / multi / xres / data.z / CHARSTNG.PS < prev    next >
Encoding:
Text File  |  1995-07-29  |  825 b   |  31 lines
  1. %!
  2. %%VMusage: 4720 4720
  3. %%VMlocation: global
  4. %%
  5. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  6. %%                                    %%
  7. %% This file implements the CharStrings category resource.        %%
  8. %%                                    %%
  9. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  10.  
  11. /Generic /Category findresource
  12. dup length 2 add dict copy
  13. dup /InstanceType /dicttype put
  14. dup /Category /CharStrings put
  15. %%
  16. %% This ugly hack required for Morisawa fonts that explicitly
  17. %% store resources in CharStringsDirectory
  18. %%
  19. dup /LocalInstances {
  20.   userdict /CharStringsDirectory known not {
  21.     userdict /CharStringsDirectory
  22.     currentglobal false setglobal 1 dict exch setglobal
  23.     put
  24.   } if
  25.   userdict /CharStringsDirectory get
  26. } bind put
  27.  
  28.  
  29. /CharStrings exch /Category defineresource pop
  30.  
  31.