diff options
author | Karl Berry <karl@freefriends.org> | 2023-09-12 20:16:23 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2023-09-12 20:16:23 +0000 |
commit | b5d2bb5f6bda9cb1b5abe05c2be7f548ad9461e4 (patch) | |
tree | 1f966be928a9859e3c79a36b88bcb428654771b3 /Master/texmf-dist/tex/generic/babel/luababel.def | |
parent | b3b4281aff18f35e1bc8fc6a639ea1949c1e392c (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.def | 24 |
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 |