diff options
-rw-r--r-- | arabluatex.dtx | 20 | ||||
-rw-r--r-- | arabluatex.lua | 14 |
2 files changed, 18 insertions, 16 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx index 2f6c92a..8ed1f36 100644 --- a/arabluatex.dtx +++ b/arabluatex.dtx | |||
@@ -257,7 +257,7 @@ | |||
257 | %</driver> | 257 | %</driver> |
258 | % \fi | 258 | % \fi |
259 | % | 259 | % |
260 | % \CheckSum{784} | 260 | % \CheckSum{0} |
261 | % | 261 | % |
262 | % \CharacterTable | 262 | % \CharacterTable |
263 | % {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z | 263 | % {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z |
@@ -829,6 +829,7 @@ vowels (see ยง~3). | |||
829 | % \vref{ref:hamza}.} & \dmg{'u 'a 'i} & | 829 | % \vref{ref:hamza}.} & \dmg{'u 'a 'i} & |
830 | % \loc{|'u, |'a, |'i} & \brill{|'u, |'a, |'i} & |'u| or |'a| or |'i| \\ | 830 | % \loc{|'u, |'a, |'i} & \brill{|'u, |'a, |'i} & |'u| or |'a| or |'i| \\ |
831 | % \arb[novoc]{b} & \dmg{b} & \loc{b} & \brill{b} & |b| \\ | 831 | % \arb[novoc]{b} & \dmg{b} & \loc{b} & \brill{b} & |b| \\ |
832 | % \pagebreak[1] | ||
832 | % \arb[novoc]{t} & \dmg{t} & \loc{t} & \brill{t} & |t| \\ | 833 | % \arb[novoc]{t} & \dmg{t} & \loc{t} & \brill{t} & |t| \\ |
833 | % \arb[novoc]{_t} & \dmg{_t} & \loc{_t} & \brill{_t} & |_t| \\ | 834 | % \arb[novoc]{_t} & \dmg{_t} & \loc{_t} & \brill{_t} & |_t| \\ |
834 | % \arb[novoc]{j} & \dmg{j} & \loc{j} & \brill{j} & |^g| or |j| \\ | 835 | % \arb[novoc]{j} & \dmg{j} & \loc{j} & \brill{j} & |^g| or |j| \\ |
@@ -2106,7 +2107,7 @@ word that \cs{arbnull} is applied to. | |||
2106 | % \arb[novoc]{.k} & \dmg{.k} & \loc{.k} & \brill{.k} & |.k| \\ | 2107 | % \arb[novoc]{.k} & \dmg{.k} & \loc{.k} & \brill{.k} & |.k| \\ |
2107 | % \arb[novoc]{.n} & \dmg{.n} & \loc{.n} & \brill{.n} & |.n| \\ | 2108 | % \arb[novoc]{.n} & \dmg{.n} & \loc{.n} & \brill{.n} & |.n| \\ |
2108 | % \arb[novoc]{((} & \dmg{((} & \loc{((} & \brill{((} & |((| \\ | 2109 | % \arb[novoc]{((} & \dmg{((} & \loc{((} & \brill{((} & |((| \\ |
2109 | % \pagebreak | 2110 | % \pagebreak[1] |
2110 | % \arb[novoc]{))} & \dmg{))} & \loc{))} & \brill{))} & |))| \\ | 2111 | % \arb[novoc]{))} & \dmg{))} & \loc{))} & \brill{))} & |))| \\ |
2111 | % \end{longtable} | 2112 | % \end{longtable} |
2112 | % | 2113 | % |
@@ -3349,13 +3350,14 @@ muhaddamaTaN mi'_danatu-hu}: \arb[trans]{ra'aytu | |||
3349 | % \arb[novoc]{_d} & \dmg{_d} & \loc{_d} & \brill{_d} & |*| & |V| \\ | 3350 | % \arb[novoc]{_d} & \dmg{_d} & \loc{_d} & \brill{_d} & |*| & |V| \\ |
3350 | % \arb[novoc]{r} & \dmg{r} & \loc{r} & \brill{r} & |r| & |r| \\ | 3351 | % \arb[novoc]{r} & \dmg{r} & \loc{r} & \brill{r} & |r| & |r| \\ |
3351 | % \arb[novoc]{z} & \dmg{z} & \loc{z} & \brill{z} & |z| & |z| \\ | 3352 | % \arb[novoc]{z} & \dmg{z} & \loc{z} & \brill{z} & |z| & |z| \\ |
3353 | % \pagebreak[1] | ||
3352 | % \arb[novoc]{s} & \dmg{s} & \loc{s} & \brill{s} & |s| & |s| \\ | 3354 | % \arb[novoc]{s} & \dmg{s} & \loc{s} & \brill{s} & |s| & |s| \\ |
3353 | % \arb[novoc]{^s} & \dmg{^s} & \loc{^s} & \brill{^s} & |$| & |c| \\ | 3355 | % \arb[novoc]{^s} & \dmg{^s} & \loc{^s} & \brill{^s} & |$| & |c| \\ |
3354 | % \arb[novoc]{.s} & \dmg{.s} & \loc{.s} & \brill{.s} & |S| & |S| \\ | 3356 | % \arb[novoc]{.s} & \dmg{.s} & \loc{.s} & \brill{.s} & |S| & |S| \\ |
3355 | % \pagebreak[1] | ||
3356 | % \arb[novoc]{.d} & \dmg{.d} & \loc{.d} & \brill{.d} & |D| & |D| \\ | 3357 | % \arb[novoc]{.d} & \dmg{.d} & \loc{.d} & \brill{.d} & |D| & |D| \\ |
3357 | % \arb[novoc]{.t} & \dmg{.t} & \loc{.t} & \brill{.t} & |T| & |T| \\ | 3358 | % \arb[novoc]{.t} & \dmg{.t} & \loc{.t} & \brill{.t} & |T| & |T| \\ |
3358 | % \arb[novoc]{.z} & \dmg{.z} & \loc{.z} & \brill{.z} & |Z| & |Z| \\ | 3359 | % \arb[novoc]{.z} & \dmg{.z} & \loc{.z} & \brill{.z} & |Z| & |Z| \\ |
3360 | % \pagebreak[1] | ||
3359 | % \arb[novoc]{`} & \dmg{`} & \loc{`} & \brill{`} & |E| & |E| \\ | 3361 | % \arb[novoc]{`} & \dmg{`} & \loc{`} & \brill{`} & |E| & |E| \\ |
3360 | % \arb[novoc]{.g} & \dmg{.g} & \loc{.g} & \brill{.g} & |g| & |g| \\ | 3362 | % \arb[novoc]{.g} & \dmg{.g} & \loc{.g} & \brill{.g} & |g| & |g| \\ |
3361 | % \arb[novoc]{f} & \dmg{f} & \loc{f} & \brill{f} & |f| & |f| \\ | 3363 | % \arb[novoc]{f} & \dmg{f} & \loc{f} & \brill{f} & |f| & |f| \\ |
@@ -4338,21 +4340,21 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4338 | {\edef\@tempa{#1}% | 4340 | {\edef\@tempa{#1}% |
4339 | \ifx\@tempa\al@mode@voc% | 4341 | \ifx\@tempa\al@mode@voc% |
4340 | \booltrue{al@rlmode}% | 4342 | \booltrue{al@rlmode}% |
4341 | \bgroup\textdir TRT\arabicfont% | 4343 | \bgroup\textdir TRT% |
4342 | \luadirect{tex.sprint(processvoc(\luastringN{#2}, | 4344 | \luadirect{tex.sprint(processvoc(\luastringN{#2}, |
4343 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4345 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4344 | \boolfalse{al@rlmode}% | 4346 | \boolfalse{al@rlmode}% |
4345 | \else% | 4347 | \else% |
4346 | \ifx\@tempa\al@mode@fullvoc% | 4348 | \ifx\@tempa\al@mode@fullvoc% |
4347 | \booltrue{al@rlmode}% | 4349 | \booltrue{al@rlmode}% |
4348 | \bgroup\textdir TRT\arabicfont% | 4350 | \bgroup\textdir TRT% |
4349 | \luadirect{tex.sprint(processfullvoc(\luastringN{#2}, | 4351 | \luadirect{tex.sprint(processfullvoc(\luastringN{#2}, |
4350 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4352 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4351 | \boolfalse{al@rlmode}% | 4353 | \boolfalse{al@rlmode}% |
4352 | \else% | 4354 | \else% |
4353 | \ifx\@tempa\al@mode@novoc% | 4355 | \ifx\@tempa\al@mode@novoc% |
4354 | \booltrue{al@rlmode}% | 4356 | \booltrue{al@rlmode}% |
4355 | \bgroup\textdir TRT\arabicfont% | 4357 | \bgroup\textdir TRT% |
4356 | \luadirect{tex.sprint(processnovoc(\luastringN{#2}, | 4358 | \luadirect{tex.sprint(processnovoc(\luastringN{#2}, |
4357 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4359 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4358 | \boolfalse{al@rlmode}% | 4360 | \boolfalse{al@rlmode}% |
@@ -4399,19 +4401,19 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4399 | {\par\edef\@tempa{#1}% | 4401 | {\par\edef\@tempa{#1}% |
4400 | \ifx\@tempa\al@mode@voc% | 4402 | \ifx\@tempa\al@mode@voc% |
4401 | \booltrue{al@rlmode}% | 4403 | \booltrue{al@rlmode}% |
4402 | \bgroup\pardir TRT\textdir TRT\arabicfont% | 4404 | \bgroup\pardir TRT\textdir TRT% |
4403 | \luadirect{tex.sprint(processvoc(\luastringO{\BODY}, | 4405 | \luadirect{tex.sprint(processvoc(\luastringO{\BODY}, |
4404 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4406 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4405 | \else% | 4407 | \else% |
4406 | \ifx\@tempa\al@mode@fullvoc% | 4408 | \ifx\@tempa\al@mode@fullvoc% |
4407 | \booltrue{al@rlmode}% | 4409 | \booltrue{al@rlmode}% |
4408 | \bgroup\pardir TRT\textdir TRT\arabicfont% | 4410 | \bgroup\pardir TRT\textdir TRT% |
4409 | \luadirect{tex.sprint(processfullvoc(\luastringO{\BODY}, | 4411 | \luadirect{tex.sprint(processfullvoc(\luastringO{\BODY}, |
4410 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4412 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4411 | \else% | 4413 | \else% |
4412 | \ifx\@tempa\al@mode@novoc% | 4414 | \ifx\@tempa\al@mode@novoc% |
4413 | \booltrue{al@rlmode}% | 4415 | \booltrue{al@rlmode}% |
4414 | \bgroup\pardir TRT\textdir TRT\arabicfont% | 4416 | \bgroup\pardir TRT\textdir TRT% |
4415 | \luadirect{tex.sprint(processnovoc(\luastringO{\BODY}, | 4417 | \luadirect{tex.sprint(processnovoc(\luastringO{\BODY}, |
4416 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4418 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4417 | \else% | 4419 | \else% |
diff --git a/arabluatex.lua b/arabluatex.lua index 8238236..deb963b 100644 --- a/arabluatex.lua +++ b/arabluatex.lua | |||
@@ -301,7 +301,7 @@ local function voc(str, rules) | |||
301 | inside = string.gsub(inside, null[i].a, null[i].b) | 301 | inside = string.gsub(inside, null[i].a, null[i].b) |
302 | end | 302 | end |
303 | inside = indnum(inside) | 303 | inside = indnum(inside) |
304 | return string.format("\\arabicfont{}%s", inside) | 304 | return string.format("\\arabicfont %s", inside) |
305 | end) | 305 | end) |
306 | return str | 306 | return str |
307 | end | 307 | end |
@@ -337,7 +337,7 @@ local function voceasy(str) | |||
337 | inside = string.gsub(inside, null[i].a, null[i].b) | 337 | inside = string.gsub(inside, null[i].a, null[i].b) |
338 | end | 338 | end |
339 | inside = indnum(inside) | 339 | inside = indnum(inside) |
340 | return string.format("\\arabicfont{}%s", inside) | 340 | return string.format("\\arabicfont %s", inside) |
341 | end) | 341 | end) |
342 | return str | 342 | return str |
343 | end | 343 | end |
@@ -390,7 +390,7 @@ local function fullvoc(str, rules) | |||
390 | inside = string.gsub(inside, null[i].a, null[i].b) | 390 | inside = string.gsub(inside, null[i].a, null[i].b) |
391 | end | 391 | end |
392 | inside = indnum(inside) | 392 | inside = indnum(inside) |
393 | return string.format("\\arabicfont{}%s", inside) | 393 | return string.format("\\arabicfont %s", inside) |
394 | end) | 394 | end) |
395 | return str | 395 | return str |
396 | end | 396 | end |
@@ -438,7 +438,7 @@ local function fullvoceasy(str, rules) | |||
438 | inside = string.gsub(inside, null[i].a, null[i].b) | 438 | inside = string.gsub(inside, null[i].a, null[i].b) |
439 | end | 439 | end |
440 | inside = indnum(inside) | 440 | inside = indnum(inside) |
441 | return string.format("\\arabicfont{}%s", inside) | 441 | return string.format("\\arabicfont %s", inside) |
442 | end) | 442 | end) |
443 | return str | 443 | return str |
444 | end | 444 | end |
@@ -474,7 +474,7 @@ local function novoc(str) | |||
474 | inside = string.gsub(inside, null[i].a, null[i].b) | 474 | inside = string.gsub(inside, null[i].a, null[i].b) |
475 | end | 475 | end |
476 | inside = indnum(inside) | 476 | inside = indnum(inside) |
477 | return string.format("\\arabicfont{}%s", inside) | 477 | return string.format("\\arabicfont %s", inside) |
478 | end) | 478 | end) |
479 | return str | 479 | return str |
480 | end | 480 | end |
@@ -510,7 +510,7 @@ local function novoceasy(str) | |||
510 | inside = string.gsub(inside, null[i].a, null[i].b) | 510 | inside = string.gsub(inside, null[i].a, null[i].b) |
511 | end | 511 | end |
512 | inside = indnum(inside) | 512 | inside = indnum(inside) |
513 | return string.format("\\arabicfont{}%s", inside) | 513 | return string.format("\\arabicfont %s", inside) |
514 | end) | 514 | end) |
515 | return str | 515 | return str |
516 | end | 516 | end |
@@ -721,7 +721,7 @@ return str | |||
721 | end | 721 | end |
722 | 722 | ||
723 | function newarbmark(abbr, rtlmk, ltrmk) | 723 | function newarbmark(abbr, rtlmk, ltrmk) |
724 | rtlmk = "\\arabicfont{}"..rtlmk | 724 | rtlmk = "\\arabicfont "..rtlmk |
725 | table.insert(arbmarks, {a = abbr, b = rtlmk, c = ltrmk}) | 725 | table.insert(arbmarks, {a = abbr, b = rtlmk, c = ltrmk}) |
726 | table.sort(arbmarks, function(a ,b) return(#a.a > #b.a) end) | 726 | table.sort(arbmarks, function(a ,b) return(#a.a > #b.a) end) |
727 | return true | 727 | return true |