/Courier-Italic findfont
dup length dict begin
{
1 index /FID ne
{def}
{pop pop}
ifelse
} forall
/Encoding ISOLatin1Encoding def
currentdict
end
/Courier-Italic-ISOLatin1 exch definefont pop
/setCourierItalic {
/Courier-Italic-ISOLatin1 findfont
fontsize scalefont
setfont
} def
/setCourrierItalic {setCourierItalic} def
|