*** term/post.trm.orig	Thu Sep 16 07:00:13 1993
--- term/post.trm	Wed Oct  5 02:54:47 1994
***************
*** 115,120 ****
--- 115,185 ----
  NULL
  };
  
+ static char *psaccents=
+ "% Define the array ISOLatin1Encoding (which specifies how characters are\n\
+ % encoded for ISO-8859-1 fonts), if it isn't already present (Postscript\n\
+ % level 2 is supposed to define it, but level 1 doesn't).\n\
+ \n\
+ systemdict /ISOLatin1Encoding known not {\n\
+     /ISOLatin1Encoding [\n\
+ 	/space /space /space /space /space /space /space /space\n\
+ 	/space /space /space /space /space /space /space /space\n\
+ 	/space /space /space /space /space /space /space /space\n\
+ 	/space /space /space /space /space /space /space /space\n\
+ 	/space /exclam /quotedbl /numbersign /dollar /percent /ampersand\n\
+ 	    /quoteright\n\
+ 	/parenleft /parenright /asterisk /plus /comma /minus /period /slash\n\
+ 	/zero /one /two /three /four /five /six /seven\n\
+ 	/eight /nine /colon /semicolon /less /equal /greater /question\n\
+ 	/at /A /B /C /D /E /F /G\n\
+ 	/H /I /J /K /L /M /N /O\n\
+ 	/P /Q /R /S /T /U /V /W\n\
+ 	/X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore\n\
+ 	/quoteleft /a /b /c /d /e /f /g\n\
+ 	/h /i /j /k /l /m /n /o\n\
+ 	/p /q /r /s /t /u /v /w\n\
+ 	/x /y /z /braceleft /bar /braceright /asciitilde /space\n\
+ 	/space /space /space /space /space /space /space /space\n\
+ 	/space /space /space /space /space /space /space /space\n\
+ 	/dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent\n\
+ 	/dieresis /space /ring /cedilla /space /hungarumlaut /ogonek /caron\n\
+ 	/space /exclamdown /cent /sterling /currency /yen /brokenbar /section\n\
+ 	/dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen\n\
+ 	    /registered /macron\n\
+ 	/degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph\n\
+ 	    /periodcentered\n\
+ 	/cedillar /onesuperior /ordmasculine /guillemotright /onequarter\n\
+ 	    /onehalf /threequarters /questiondown\n\
+ 	/Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla\n\
+ 	/Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex\n\
+ 	    /Idieresis\n\
+ 	/Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply\n\
+ 	/Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn\n\
+ 	    /germandbls\n\
+ 	/agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla\n\
+ 	/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex\n\
+ 	    /idieresis\n\
+ 	/eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide\n\
+ 	/oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn\n\
+ 	    /ydieresis\n\
+     ] def\n\
+ } if\n\
+ \n\
+ % Override the setfont procedure with a new procedure that re-encodes\n\
+ % the font to use the ISO Latin-1 style.  The body of this procedure\n\
+ % comes from Section 5.6.1 of the Postscript book.\n\
+ \n\
+ /realsetfont /setfont load def\n\
+ /setfont {\n\
+     dup length dict begin\n\
+ 	{1 index /FID ne {def} {pop pop} ifelse} forall\n\
+ 	/Encoding ISOLatin1Encoding def\n\
+ 	currentdict\n\
+     end\n\
+     /Temporary exch definefont\n\
+     realsetfont\n\
+ } bind def\n";
+ 
  #define PS_XOFF	50	/* page offset in pts */
  #define PS_YOFF	50
  
***************
*** 258,264 ****
  
  	for ( i=0; PS_header[i] != NULL; i++)
  		fprintf(outfile,"%s",PS_header[i]);
! 	fprintf(outfile,"end\n%%%%EndProlog\n");
  }
  
  
--- 323,331 ----
  
  	for ( i=0; PS_header[i] != NULL; i++)
  		fprintf(outfile,"%s",PS_header[i]);
! 	fprintf(outfile,"end\n"); 
! 	fprintf (outfile, "%s", psaccents); 
! 	fprintf (outfile, "%%%%EndProlog\n");
  }