summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/xetexdir/xetex.ch
diff options
context:
space:
mode:
authorJonathan Kew <jfkthame@googlemail.com>2009-09-04 03:51:49 +0000
committerJonathan Kew <jfkthame@googlemail.com>2009-09-04 03:51:49 +0000
commit4a9a5e0e400d2368a9a420a39c8d3aa5f3a27326 (patch)
treec7cc376e1bdb14e66bc45e5cb5eedb2245dab441 /Build/source/texk/web2c/xetexdir/xetex.ch
parentbfbedaca6412a5244e355e034684d243ff0da740 (diff)
xetex 0.9995.1: fix two \XeTeXmathaccent bugs
git-svn-id: svn://tug.org/texlive/trunk@15079 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/xetexdir/xetex.ch')
-rw-r--r--Build/source/texk/web2c/xetexdir/xetex.ch10
1 files changed, 5 insertions, 5 deletions
diff --git a/Build/source/texk/web2c/xetexdir/xetex.ch b/Build/source/texk/web2c/xetexdir/xetex.ch
index a92a8ccf09b..e41370a06a0 100644
--- a/Build/source/texk/web2c/xetexdir/xetex.ch
+++ b/Build/source/texk/web2c/xetexdir/xetex.ch
@@ -67,7 +67,7 @@ authorization from the copyright holders.
@d XeTeX_version=0
@d XeTeX_revision==".9995"
-@d XeTeX_version_string=='-0.9995.0' {current \XeTeX\ version}
+@d XeTeX_version_string=='-0.9995.1' {current \XeTeX\ version}
@z
@x
@@ -4721,11 +4721,11 @@ if x<>null then begin
wa:=get_ot_math_accent_pos(f,native_glyph(p));
if wa=@"7FFFFFFF then wa:=half(width(y));
p:=list_ptr(x);
- if (type(p)=whatsit_node) and (subtype(p)=glyph_node) and (link(p)=null) then begin
- w:=get_ot_math_accent_pos(native_font(p), native_glyph(p));
- if w=@"7FFFFFFF then w:=half(width(x));
+ if (p<>null) and (type(p)=whatsit_node) and (subtype(p)=glyph_node) and (link(p)=null) then begin
+ w2:=get_ot_math_accent_pos(native_font(p), native_glyph(p));
+ if w2=@"7FFFFFFF then w:=half(w) else w:=w2;
end else
- w:=half(width(x));
+ w:=half(w);
shift_amount(y):=s+w-wa;
end else
shift_amount(y):=s+half(w-width(y));