aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xaux/emparse22
1 files changed, 18 insertions, 4 deletions
diff --git a/aux/emparse b/aux/emparse
index e7e1fb5..65644e9 100755
--- a/aux/emparse
+++ b/aux/emparse
@@ -89,8 +89,10 @@ function format(line) {
if (match(w[i], "^\\[[0-9a-z]+\\]$"))
w[i] = ref(substr(w[i], 2, RLENGTH-2))
- else if (match(w[i], "^\[[0-9a-z]+\][.,:;?!]$"))
+ else if (match(w[i], "^\\[[0-9a-z]+\\][.,:;?!)]$"))
w[i] = ref(substr(w[i], 2, RLENGTH-3)) substr(w[i], RLENGTH)
+ else if (match(w[i], "^\\[[0-9a-z]+\\]\\)[.,:;?!]$"))
+ w[i] = ref(substr(w[i], 2, RLENGTH-4)) substr(w[i], RLENGTH-1)
if (match(w[i], "^`"))
w[i] = "<tt>" substr(w[i], 2)
@@ -98,6 +100,12 @@ function format(line) {
w[i] = "<i>" substr(w[i], 2)
else if (match(w[i], "^_"))
w[i] = "<b>" substr(w[i], 2)
+ else if (match(w[i], "^\\(`"))
+ w[i] = "(<tt>" substr(w[i], 3)
+ else if (match(w[i], "^\\(\\*"))
+ w[i] = "(<i>" substr(w[i], 3)
+ else if (match(w[i], "^\\(_"))
+ w[i] = "(<b>" substr(w[i], 3)
if (match(w[i], "`$"))
w[i] = substr(w[i], 1, RSTART-1) "</tt>"
@@ -105,11 +113,17 @@ function format(line) {
w[i] = substr(w[i], 1, RSTART-1) "</i>"
else if (match(w[i], "_$"))
w[i] = substr(w[i], 1, RSTART-1) "</b>"
- else if (match(w[i], "`[.,:;?!]$"))
+ else if (match(w[i], "`[.,:;?!)]$"))
w[i] = substr(w[i], 1, RSTART-1) "</tt>" substr(w[i], RSTART+1)
- else if (match(w[i], "\\*\.$"))
+ else if (match(w[i], "\\*[.,:;?!)]$"))
w[i] = substr(w[i], 1, RSTART-1) "</i>" substr(w[i], RSTART+1)
- else if (match(w[i], "_[.,:;?!]$"))
+ else if (match(w[i], "_[.,:;?!)]$"))
+ w[i] = substr(w[i], 1, RSTART-1) "</b>" substr(w[i], RSTART+1)
+ else if (match(w[i], "`\\)[.,:;?!]$"))
+ w[i] = substr(w[i], 1, RSTART-1) "</tt>" substr(w[i], RSTART+1)
+ else if (match(w[i], "\\*\\)[.,:;?!]$"))
+ w[i] = substr(w[i], 1, RSTART-1) "</i>" substr(w[i], RSTART+1)
+ else if (match(w[i], "_\\)[.,:;?!]$"))
w[i] = substr(w[i], 1, RSTART-1) "</b>" substr(w[i], RSTART+1)
printf "%s", w[i]