summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2011-03-31 07:18:30 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2011-03-31 07:18:30 +0000
commitbb9fb0ff57117f1eef90f381c0b0b767e33058ff (patch)
tree3346132078fc9d5ea743d59e0b5cc7c7d9d39150 /Build
parent34354afd0162468ba5749a0e9b863983c12caf8d (diff)
e-pTeX: fix a bug introduced in r21892
git-svn-id: svn://tug.org/texlive/trunk@21900 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rw-r--r--Build/source/texk/web2c/eptexdir/eptex.ech15
1 files changed, 8 insertions, 7 deletions
diff --git a/Build/source/texk/web2c/eptexdir/eptex.ech b/Build/source/texk/web2c/eptexdir/eptex.ech
index 53738c2e0a5..f030f0da21f 100644
--- a/Build/source/texk/web2c/eptexdir/eptex.ech
+++ b/Build/source/texk/web2c/eptexdir/eptex.ech
@@ -74,15 +74,16 @@ non-|disp_node| of the current list.
tx:=tail;
if not is_char_node(tx) then if type(tx)=disp_node then tx:=prev_node;
if not is_char_node(tx) then
- if (type(tx)=disp_node)or
- ((type(tx)=math_node)and(subtype(tx)=end_M_code)) then
- begin tx:=head; q:=link(head);
- while q<>prev_node do
- begin if is_char_node(q) then tx:=q
+ if (type(tx)=disp_node) {|disp_node| from a discretionary}
+ or((type(tx)=math_node)and(subtype(tx)=end_M_code)) then
+ begin r:=head; q:=link(head);
+ while q<>tx do
+ begin if is_char_node(q) then r:=q
else if (type(q)<>disp_node)and
- ((type(tx)<>math_node)or(subtype(tx)<>end_M_code)) then tx:=q;
+ ((type(tx)<>math_node)or(subtype(tx)<>end_M_code)) then r:=q;
+ q:=link(q);
end;
- q:=link(q);
+ tx:=r;
end
@#
@d find_effective_tail==find_effective_tail_epTeX