bugfix: the rules of art. + 'quoted' initial unstable hamzah were thrown away by the rules of initial ʾalif without hamzah in the trigraphstrdmg table

1 files changed, 7 insertions, 7 deletions

diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index a91ae0e..bf6be44 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -176,8 +176,8 @@ trigraphstrdmg = { -- trigraphs or more
    {a="^(a)([%_%^%.]?[tdrzsn])%-", b="%1%2-"},
    {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1%2%3-"},
    -- al- + initial unstable hamza
-   {a="^(a)l%-([uai])", b="%1l-%2"},
-   {a="([%s%-])(a)l%-([uai])", b="%1%2l-%3"},
+   {a="^(a)l%-(\"?[uai])", b="%1l-%2"},
+   {a="([%s%-])(a)l%-(\"?[uai])", b="%1%2l-%3"},
    -- li-/la- + art. + initial unstable hamza is a special orthography
    {a="l([ai])%-l%-([uai])", b="l%1-l-%2"},
    -- al- + lunar consonant (i.e. what remains)
@@ -199,7 +199,7 @@ trigraphstrdmg = { -- trigraphs or more
    -- li-/la- + assim. art. + solar consonant is a special orthography
    {a="l([ai])%-([%_%^%.]?[tdrzsn])%-([%_%^%.]?[tdrzsn])", b="l%1-%2-%3"},
    -- art. with waṣla + initial unstable hamza
-   {a="'l%-([uai])", b="'l-%1"},   
+   {a="'l%-(\"?[uai])", b="'l-%1"},
    -- art. with waṣla + lunar consonant (i.e. what remains)
    {a="'l%-", b="'l-"},
    -- the silent wāw
@@ -225,10 +225,10 @@ digraphstrdmg = {
    -- the following two are replaced with the 4 lines next for now
 --   {a="^(\"?[uai])", b="%1"},      -- initial alif without hamza
 --   {a="(%W)(\"?[uai])", b="%1%2"},      -- initial alif without hamza
-   {a="^(\"[uai])", b="'"},      -- initial alif without hamza
-   {a="(%W)(\"[uai])", b="%1'"},      -- initial alif without hamza
-   {a="^([uai])", b="%1"},      -- initial alif without hamza
-   {a="(%W)([uai])", b="%1%2"},      -- initial alif without hamza
+--   {a="^(\"[uai])", b="'"},      -- initial alif without hamza
+--   {a="(%W)(\"[uai])", b="%1'"},      -- initial alif without hamza
+   {a="^(\"?[uai])", b="%1"},      -- initial alif without hamza
+   {a="(%W)(\"?[uai])", b="%1%2"},      -- initial alif without hamza
    -- this is not necessary, take out for now:
 -- {a="([%_]?[uaiUAIY])(%s)([uai])", b="%1%2'"}, -- initial alif without hamza
    {a="(aW)(%s)(\"?[uai])", b="awu%2%3"},