summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/tex/scanning.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/tex/scanning.c')
-rw-r--r--Build/source/texk/web2c/luatexdir/tex/scanning.c10
1 files changed, 8 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/luatexdir/tex/scanning.c b/Build/source/texk/web2c/luatexdir/tex/scanning.c
index 8f7e1d59178..66f28a18b13 100644
--- a/Build/source/texk/web2c/luatexdir/tex/scanning.c
+++ b/Build/source/texk/web2c/luatexdir/tex/scanning.c
@@ -505,12 +505,18 @@ static boolean short_scan_something_internal(int cmd, int chr, int level, boolea
break;
case glue_stretch_order_code:
case glue_shrink_order_code:
+ case eTeX_glue_stretch_order_code:
+ case eTeX_glue_shrink_order_code:
scan_normal_glue();
q = cur_val;
- if (m == glue_stretch_order_code)
+ if (m == glue_stretch_order_code || m == eTeX_glue_stretch_order_code) {
cur_val = stretch_order(q);
- else
+ } else {
cur_val = shrink_order(q);
+ }
+ if (cur_val && (m == eTeX_glue_stretch_order_code || m == eTeX_glue_shrink_order_code)) {
+ cur_val = (cur_val == 1) ? - 1 : cur_val - 1;
+ }
flush_node(q);
break;
}