From 4588ab71394187a697d9218251e6ed886f429aaf Mon Sep 17 00:00:00 2001 From: Robert Alessi Date: Thu, 16 Jun 2022 01:17:15 +0200 Subject: =?UTF-8?q?use=20H=20to=20encode=20the=20t=C4=81=CA=BE=20marb?= =?UTF-8?q?=C5=ABtah=20devoid=20of=20diacritical=20points?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- arabluatex_novoc.lua | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'arabluatex_novoc.lua') diff --git a/arabluatex_novoc.lua b/arabluatex_novoc.lua index b77cfda..f2d0d5a 100644 --- a/arabluatex_novoc.lua +++ b/arabluatex_novoc.lua @@ -36,9 +36,9 @@ tanwinnv = { -- {a="(O[%S]-)(%-?aN)(Y)(O)([rlmnwy])", b="%5%5"}, -- {a="%-?(aN)(_A)(%s)([rlmnwy])", b="ى%3%4%4"}, -- {a="%-?(aN)(Y)(%s)([rlmnwy])", b="ى%3%4%4"}, --- {a="(T)%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, +-- {a="([TH])%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, -- {a="(ء)%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, --- {a="([^TA])%-?(aN)(%s)([rlmnwy])", b="%1ا%3%4%4"}, +-- {a="([^TAH])%-?(aN)(%s)([rlmnwy])", b="%1ا%3%4%4"}, -- {a="%-?(iNI?)(%s)([rlmnwy])", b="|%2%3%3"}, -- assimilations (end) -- "quoted" tanwīn (begin) @@ -46,9 +46,9 @@ tanwinnv = { {a="(B)%-?(\"aN)", b="%1ً"}, {a="%-?(\"aN)(_A)", b="ًى"}, {a="%-?(\"aN)(Y)", b="ًى"}, - {a="(T)%-?(\"aN)", b="%1ً"}, + {a="([TH])%-?(\"aN)", b="%1ً"}, {a="([اآ])(ء)%-?(\"aN)", b="%1%2ً"}, --new - {a="([^TA])%-?(\"aN)", b="%1ًا"}, + {a="([^TAH])%-?(\"aN)", b="%1ًا"}, {a="%-?(\"iNI?)", b="ٍ"}, -- "quoted" tanwīn (end) {a="%-?(uN)", b=""}, @@ -56,15 +56,15 @@ tanwinnv = { -- needed by \arbcolor: {a="%-?(aN)(O[%S]-%_AO)", b=""}, {a="%-?(aN)(O[%S]-YO)", b=""}, - {a="(O[%S]-TO)%-?(aN)", b=""}, + {a="(O[%S]-[TH]O)%-?(aN)", b=""}, {a="(O[%S]-)([اآ])(ء)(O)%-?(aN)", b=""}, --new - {a="(O[%S]-[^TA]O)%-?(aN)", b=""}, + {a="(O[%S]-[^TAH]O)%-?(aN)", b=""}, -- {a="%-?(aN)(_A)", b="ى"}, {a="%-?(aN)(Y)", b="ى"}, - {a="(T)%-?(aN)", b="%1"}, + {a="([TH])%-?(aN)", b="%1"}, {a="([اآ])(ء)%-?(aN)", b="%1%2"}, --new - {a="([^TA])%-?(aN)", b="%1ا"}, + {a="([^TAH])%-?(aN)", b="%1ا"}, {a="%-?(iNI?)", b=""}, -- ʾalif al-waṣl: put it back on with \arbnull {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="%4"}, -- cgit v1.2.3