[XeTeX] xdvipdfmx doesn't seem to respect PDF crop areas

[Akira Kakuto]

Hi Jonathan,

> > Please move
> > /usr/local/teTeX/share/texmf.tetex/tex/latex/dvipdfm/dvipdfm.def
> > into
> > /usr/local/teTeX/share/texmf.local/tex/latex/graphics/
> 
> Fantastic. Everything works now! Thanks Akira for all the help,  
> especially with dvipdfm.def and getting ebb to work with recent PDF  
> versions.

If I change xetex-new.ch as follows, the example by Zachary
becomes correct in the case of xetex.def + xdvipdfmx.
Is the change wrong and does interfere xetex.def + xdv2pdf?

Thanks,
Akira

 
--- xetex-new.ch.orig	Fri Sep 22 20:41:18 2006
+++ xetex-new.ch	Sun Sep 24 19:03:52 2006
@@ -5342,10 +5342,15 @@
 	{ access the picture file and check its size }
 	result := find_pic_file(address_of(pic_path), address_of(bounds), pdf_box_type, page);
 
-	setPoint(corners[0], 0.0, 0.0);
-	setPoint(corners[1], 0.0, htField(bounds) * 72.27 / 72.0);
-	setPoint(corners[2], wdField(bounds) * 72.27 / 72.0, htField(bounds) * 72.27 / 72.0);
-	setPoint(corners[3], wdField(bounds) * 72.27 / 72.0, 0.0);
+	setPoint(corners[0], xField(bounds) * 72.27 / 72.0,
+		yField(bounds) * 72.27 / 72.0);
+	setPoint(corners[1], xField(bounds) * 72.27 / 72.0,
+		yField(bounds) * 72.27 / 72.0 + htField(bounds) * 72.27 / 72.0);
+	setPoint(corners[2], xField(bounds) * 72.27 / 72.0
+		+wdField(bounds) * 72.27 / 72.0,
+		yField(bounds) * 72.27 / 72.0+htField(bounds) * 72.27 / 72.0);
+	setPoint(corners[3], xField(bounds) * 72.27 / 72.0
+		+wdField(bounds) * 72.27 / 72.0, yField(bounds) * 72.27 / 72.0);
 
 	x_size_req := 0.0;
 	y_size_req := 0.0;