summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/pdftexdir/pdftex.web
diff options
context:
space:
mode:
authorHan The Thanh <hanthethanh@gmail.com>2011-03-01 01:43:47 +0000
committerHan The Thanh <hanthethanh@gmail.com>2011-03-01 01:43:47 +0000
commit6dcd44939d4765af4a24a7969f1fef796b6c0b15 (patch)
treea888c1d2336a88543f76d126ba8966c4d76a71b4 /Build/source/texk/web2c/pdftexdir/pdftex.web
parent81af3bd308254a1148792ac692106f2aa8d1a46d (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.web16
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;