diff options
| author | Robert Alessi <alessi@robertalessi.net> | 2016-07-06 15:05:21 +0200 |
|---|---|---|
| committer | Robert Alessi <alessi@robertalessi.net> | 2016-07-06 15:05:21 +0200 |
| commit | a4c414bd2688047f512f5818e079468fb1c5b5ce (patch) | |
| tree | bbce2fb3698f83ebf8d801ca8df05f4270d8e096 /arabluatex.lua | |
| parent | c81e964d4b9ebea5776e35c52cf626b861046483 (diff) | |
| download | arabluatex-a4c414bd2688047f512f5818e079468fb1c5b5ce.tar.gz | |
adapted \cap to accept the local hyphenation command \-
Diffstat (limited to 'arabluatex.lua')
| -rw-r--r-- | arabluatex.lua | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/arabluatex.lua b/arabluatex.lua index 435fe83..4c2fac5 100644 --- a/arabluatex.lua +++ b/arabluatex.lua | |||
| @@ -549,11 +549,11 @@ function cap(str) | |||
| 549 | body = string.sub(body, 2, -2) | 549 | body = string.sub(body, 2, -2) |
| 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 ") |