diff options
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/pdftex.web')
-rw-r--r-- | Build/source/texk/web2c/pdftexdir/pdftex.web | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web index e570526488e..86bd827890e 100644 --- a/Build/source/texk/web2c/pdftexdir/pdftex.web +++ b/Build/source/texk/web2c/pdftexdir/pdftex.web @@ -19310,6 +19310,9 @@ if pdf_obj_list <> null then begin end; end +@ @<Glob...@>= +@!saved_pdf_cur_form: integer; + @ When flushing pending forms we need to save and restore resource lists (|pdf_font_list|, |pdf_obj_list|, |pdf_xform_list| and |pdf_ximage_list|), which are also used by page shipping. @@ -19319,10 +19322,12 @@ if pdf_xform_list <> null then begin k := pdf_xform_list; while k <> null do begin if not is_obj_written(info(k)) then begin + saved_pdf_cur_form := pdf_cur_form; pdf_cur_form := info(k); @<Save resource lists@>; @<Reset resource lists@>; pdf_ship_out(obj_xform_box(pdf_cur_form), false); + pdf_cur_form := saved_pdf_cur_form; @<Restore resource lists@>; end; k := link(k); |