Apply patch from Uwe Kleine-König to deal with latin1 characters
[pgp-tools.git] / gpg-key2ps / gpg-key2ps
index 9351707776d6546ecf2c96e48e5e4aa2abaf30b8..4fbafad840c365c569c31e4dd542b2090acfb959 100755 (executable)
@@ -121,7 +121,21 @@ print <<EOF;
 /w $w def
 /h $h def
 
-/Times-Roman findfont 9 scalefont setfont 
+/reencode {
+       exch findfont
+       dup length dict
+       begin {
+               1 index /FID eq
+               { pop pop }
+               { def } ifelse
+       } forall
+       /Encoding ISOLatin1Encoding def
+       currentdict
+       end
+       definefont
+} bind def
+
+/Times-Roman /trlatin1 reencode 9 scalefont setfont
 
 /newline {
        /y y 10 sub def