summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/babel/luababel.def
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2023-09-12 20:16:23 +0000
committerKarl Berry <karl@freefriends.org>2023-09-12 20:16:23 +0000
commitb5d2bb5f6bda9cb1b5abe05c2be7f548ad9461e4 (patch)
tree1f966be928a9859e3c79a36b88bcb428654771b3 /Master/texmf-dist/tex/generic/babel/luababel.def
parentb3b4281aff18f35e1bc8fc6a639ea1949c1e392c (diff)
babel (12sep23)
git-svn-id: svn://tug.org/texlive/trunk@68258 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/babel/luababel.def')
-rw-r--r--Master/texmf-dist/tex/generic/babel/luababel.def24
1 files changed, 14 insertions, 10 deletions
diff --git a/Master/texmf-dist/tex/generic/babel/luababel.def b/Master/texmf-dist/tex/generic/babel/luababel.def
index 257274d41e0..4d020f7788c 100644
--- a/Master/texmf-dist/tex/generic/babel/luababel.def
+++ b/Master/texmf-dist/tex/generic/babel/luababel.def
@@ -601,7 +601,7 @@ end
\catcode`_=11 \catcode`:=11
\gdef\bblar@nofswarn{\gdef\msg_warning:nnx##1##2##3{}}
\endgroup
-\gdef\bbl@arabicjust{%
+\gdef\bbl@arabicjust{% TODO. Allow for serveral locales.
\let\bbl@arabicjust\relax
\newattribute\bblar@kashida
\directlua{ Babel.attr_kashida = luatexbase.registernumber'bblar@kashida' }%
@@ -786,6 +786,8 @@ function Babel.arabic.justify_hlist(head, line, gc, size, pack)
if k_list[k_curr].weight == Babel.kashida_wts[wt_pos] then
d = node.copy(k_item)
d.char = 0x0640
+ d.yoffset = 0 % TODO. From the prev char. But 0 seems safe.
+ d.xoffset = 0
line.head, new = node.insert_after(line.head, k_item, d)
width_new = node.dimensions(line.head)
if width > goal or width == width_new then
@@ -1482,9 +1484,7 @@ end
\fi
\bbl@trace{Redefinitions for bidi layout}
\ifnum\bbl@bidimode>\z@ % Any bidi=
- \ifx\matheqdirmode\@undefined\else
- \matheqdirmode\@ne % A luatex primitive
- \fi
+ \matheqdirmode\@ne % A luatex primitive
\let\bbl@eqnodir\relax
\def\bbl@eqdel{()}
\def\bbl@eqnum{%
@@ -1497,17 +1497,21 @@ end
\def\bbl@eqno@flip#1{%
\ifdim\predisplaysize=-\maxdimen
\eqno
- \hb@xt@.01pt{\hb@xt@\displaywidth{\hss{#1}}\hss}%
+ \hb@xt@.01pt{%
+ \hb@xt@\displaywidth{\hss{#1\glet\bbl@upset\@currentlabel}}\hss}%
\else
- \leqno\hbox{#1}%
- \fi}
+ \leqno\hbox{#1\glet\bbl@upset\@currentlabel}%
+ \fi
+ \bbl@exp{\def\\\@currentlabel{\[bbl@upset]}}}
\def\bbl@leqno@flip#1{%
\ifdim\predisplaysize=-\maxdimen
\leqno
- \hb@xt@.01pt{\hss\hb@xt@\displaywidth{{#1}\hss}}%
+ \hb@xt@.01pt{%
+ \hss\hb@xt@\displaywidth{{#1\glet\bbl@upset\@currentlabel}\hss}}%
\else
- \eqno\hbox{#1}%
- \fi}
+ \eqno\hbox{#1\glet\bbl@upset\@currentlabel}%
+ \fi
+ \bbl@exp{\def\\\@currentlabel{\[bbl@upset]}}}
\AtBeginDocument{%
\ifx\bbl@noamsmath\relax\else
\ifx\maketag@@@\@undefined % Normal equation, eqnarray