~mdw
/
sgt
/
halibut
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Correct embedding of Type 1 fonts in PDF. Error cases (e.g. invalid Type 1
[sgt/halibut]
/
bk_ps.c
diff --git
a/bk_ps.c
b/bk_ps.c
index
35fe582
..
41b70d2
100644
(file)
--- a/
bk_ps.c
+++ b/
bk_ps.c
@@
-108,13
+108,15
@@
void ps_backend(paragraph *sourceform, keywordlist *keywords,
"/pdfmark where { pop\n"
" /p { [ /Dest 3 -1 roll /View [ /XYZ null null null ]\n"
" /DEST pdfmark } bind def\n"
"/pdfmark where { pop\n"
" /p { [ /Dest 3 -1 roll /View [ /XYZ null null null ]\n"
" /DEST pdfmark } bind def\n"
- " /x { [ /Dest 3 -1 roll /Rect 5 -1 roll /Border [0 0 0
0
]\n"
+ " /x { [ /Dest 3 -1 roll /Rect 5 -1 roll /Border [0 0 0]\n"
" /Subtype /Link /ANN pdfmark } bind def\n"
" /u { 2 dict dup /Subtype /URI put dup /URI 4 -1 roll put\n"
" /Subtype /Link /ANN pdfmark } bind def\n"
" /u { 2 dict dup /Subtype /URI put dup /URI 4 -1 roll put\n"
- " [ /Action 3 -1 roll /Rect 5 -1 roll /Border [0 0 0
0
]\n"
+ " [ /Action 3 -1 roll /Rect 5 -1 roll /Border [0 0 0]\n"
" /Subtype /Link /ANN pdfmark } bind def\n"
"} {\n"
" /Subtype /Link /ANN pdfmark } bind def\n"
"} {\n"
- " [/p /x /u] { null cvx def } forall\n"
+ " /p { pop } bind def\n"
+ " /x { pop pop } bind def\n"
+ " /u /x load def\n"
"} ifelse\n");
fprintf(fp, "%%%%EndResource\n");
"} ifelse\n");
fprintf(fp, "%%%%EndResource\n");