diff options
| author | Robert Alessi <alessi@robertalessi.net> | 2016-07-07 09:48:50 +0200 |
|---|---|---|
| committer | Robert Alessi <alessi@robertalessi.net> | 2016-07-07 09:48:50 +0200 |
| commit | 6ef6fbd5deb831245fec275de126fc8b2a7f7979 (patch) | |
| tree | 373978ed732e3ed085e2b1f61fbc1f0084ca1370 /arabluatex.lua | |
| parent | a4c414bd2688047f512f5818e079468fb1c5b5ce (diff) | |
| download | arabluatex-6ef6fbd5deb831245fec275de126fc8b2a7f7979.tar.gz | |
\cap needed more work to accept \- properly
Diffstat (limited to 'arabluatex.lua')
| -rw-r--r-- | arabluatex.lua | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/arabluatex.lua b/arabluatex.lua index 4c2fac5..c0e0232 100644 --- a/arabluatex.lua +++ b/arabluatex.lua | |||
| @@ -550,11 +550,11 @@ function cap(str) | |||
| 550 | return string.format("%s", body) | 550 | return string.format("%s", body) |
| 551 | end) | 551 | end) |
| 552 | if string.find(str, "[^\\]%-['`ʾʿ]") then | 552 | if string.find(str, "[^\\]%-['`ʾʿ]") then |
| 553 | str = string.gsub(str, "(%-['`])", "%1\\MakeUppercase ") | 553 | str = string.gsub(str, "([^\\]%-['`])", "%1\\MakeUppercase ") |
| 554 | str = string.gsub(str, "(%-ʿ)", "%1\\MakeUppercase ") | 554 | str = string.gsub(str, "([^\\]%-ʿ)", "%1\\MakeUppercase ") |
| 555 | str = string.gsub(str, "(%-ʾ)", "%1\\MakeUppercase ") | 555 | str = string.gsub(str, "([^\\]%-ʾ)", "%1\\MakeUppercase ") |
| 556 | elseif string.find(str, "[^\\]%-[^'`ʾʿ]") then | 556 | elseif string.find(str, "[^\\]%-[^'`ʾʿ]") then |
| 557 | str = string.gsub(str, "(%-)", "%1\\MakeUppercase ") | 557 | str = string.gsub(str, "([^\\]%-)", "%1\\MakeUppercase ") |
| 558 | elseif string.find(str, "^['`ʾʿ]") then | 558 | elseif string.find(str, "^['`ʾʿ]") then |
| 559 | str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ") | 559 | str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ") |
| 560 | str = string.gsub(str, "^(ʿ)", "%1\\MakeUppercase ") | 560 | str = string.gsub(str, "^(ʿ)", "%1\\MakeUppercase ") |