diff options
author | Karl Berry <karl@freefriends.org> | 2012-05-19 23:57:09 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2012-05-19 23:57:09 +0000 |
commit | 0155f7a770f91947e43257c4e3844d79aefa63ec (patch) | |
tree | c9dc5fc51fd1c8ef1d5713baca95d9de111d7eef /Build/source/texk/web2c/pdftexdir/pdftex.web | |
parent | 91870f4aa72508cb121819609144a0f939be4379 (diff) |
partial page-group fix from thanh for http://bugs.debian.org/672951
git-svn-id: svn://tug.org/texlive/trunk@26495 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/pdftex.web')
-rw-r--r-- | Build/source/texk/web2c/pdftexdir/pdftex.web | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web index 956514c239f..4c20f370c13 100644 --- a/Build/source/texk/web2c/pdftexdir/pdftex.web +++ b/Build/source/texk/web2c/pdftexdir/pdftex.web @@ -36064,7 +36064,7 @@ begin pdf_append_list(pdf_ximage_objnum(p))(pdf_ximage_list); if not is_pdf_image(image) then begin if is_png_image(image) then begin - groupref := image_group_ref(image); + groupref := get_image_group_ref(image); if (groupref > 0) and (pdf_page_group_val = 0) then pdf_page_group_val := groupref; end; @@ -36079,9 +36079,14 @@ begin end else begin {for pdf images we generate the page group object number here} - groupref := image_group_ref(image); {this is only a flag whether page group is present} - if (groupref > 0) and (pdf_page_group_val = 0) then begin - pdf_page_group_val := pdf_new_objnum; + groupref := get_image_group_ref(image); {0: no group, -1: to be generated; >0: already written} + if (groupref <> 0) and (pdf_page_group_val = 0) then begin + if groupref = -1 then begin + pdf_page_group_val := pdf_new_objnum; + set_image_group_ref(image, pdf_page_group_val); + end + else { groupref > 0 } + pdf_page_group_val := groupref; end; pdf_print_real(ext_xn_over_d(pdf_width(p), ten_pow[6], img_w), 6); |