diff options
author | Han The Thanh <hanthethanh@gmail.com> | 2011-03-01 01:43:47 +0000 |
---|---|---|
committer | Han The Thanh <hanthethanh@gmail.com> | 2011-03-01 01:43:47 +0000 |
commit | 6dcd44939d4765af4a24a7969f1fef796b6c0b15 (patch) | |
tree | a888c1d2336a88543f76d126ba8966c4d76a71b4 /Build/source/texk/web2c/pdftexdir/pdftex.web | |
parent | 81af3bd308254a1148792ac692106f2aa8d1a46d (diff) |
fix for page group (bug report #4326)
git-svn-id: svn://tug.org/texlive/trunk@21555 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 | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web index d96a1ff0750..776aa446212 100644 --- a/Build/source/texk/web2c/pdftexdir/pdftex.web +++ b/Build/source/texk/web2c/pdftexdir/pdftex.web @@ -15224,7 +15224,6 @@ zip_write_state := no_zip; pdf_minor_version_written := false; fixed_pdfoutput_set := false; fixed_pdf_draftmode_set := false; -pdf_page_group_val := -1; @ @p @@ -18743,6 +18742,7 @@ fix_pdfoutput; temp_ptr:=p; prepare_mag; pdf_last_resources := pdf_new_objnum; +pdf_page_group_val := 0; @<Reset resource lists@>; if not shipping_page then begin pdf_xform_width := width(p); @@ -18969,7 +18969,6 @@ if pdf_page_group_val > 0 then begin pdf_print("/Group "); pdf_print_int(pdf_page_group_val); pdf_print_ln(" 0 R"); - pdf_page_group_val := -1; end; @<Generate array of annotations or beads in page@>; pdf_end_dict @@ -36027,9 +36026,9 @@ 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); - if (groupref>0) and (pdf_page_group_val<1) then - pdf_page_group_val := groupref; + groupref := image_group_ref(image); + if (groupref > 0) and (pdf_page_group_val = 0) then + pdf_page_group_val := groupref; end; pdf_print_real(ext_xn_over_d(pdf_width(p), ten_pow[6], one_hundred_bp), 4); @@ -36041,7 +36040,11 @@ begin pdf_print_bp(pdf_y(cur_v)); end else begin - if pdf_page_group_val<1 then pdf_page_group_val := image_group_ref (image); + {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; + end; pdf_print_real(ext_xn_over_d(pdf_width(p), ten_pow[6], img_w), 6); pdf_print(" 0 0 "); @@ -36064,7 +36067,6 @@ begin pdf_print_ln("Q"); end; - function gap_amount(p: pointer; cur_pos: scaled): scaled; {find the gap between the position of the current snap node |p| and the nearest point on the grid} var snap_unit, stretch_amount, shrink_amount: scaled; |