X-Git-Url: https://zdv2.bktei.com/gitweb/BK-2020-03.git/blobdiff_plain/ff2218cf959027171b9c393d8d6572519a3caf6f:/unitproc/bkt-replace_apostrophes..e424b71045e5259dcdb9f28e70864a7f96499ef9:/unitproc/bkt-replace_apos?ds=inline

diff --git a/unitproc/bkt-replace_apostrophes b/unitproc/bkt-replace_apos
similarity index 97%
rename from unitproc/bkt-replace_apostrophes
rename to unitproc/bkt-replace_apos
index 4e6c95b..1ba50fc 100644
--- a/unitproc/bkt-replace_apostrophes
+++ b/unitproc/bkt-replace_apos
@@ -8,7 +8,7 @@ function replace_apostrophes() {
     # Input: stdin
     #        arg1   file path
     # Output: stdout
-    # Version: 1.0.0 (BK-2020-03)
+    # Version: 1.1.0 (BK-2020-03)
     # Depends: GNU sed 4.8
 
     # Check input
@@ -64,7 +64,8 @@ function replace_apostrophes() {
         -e "s/(she|She|SHE)'(d|D|ll|LL)'(ve|VE)/\1ʼ\2ʼ\3/g" \
         -e "s/(she|She|SHE)'(d|D|ll|LL|s|S)/\1ʼ\2/g" \
         -e "s/(shan|Shan|SHAN)'(t|T)/\1ʼ\2/g" \
-        -e "s/'(s\b)/ʼ\1/g" \
+        -e "s/'(s|S)\b/ʼ\1/g" \
+        -e "s/(s|S)'( |$)/\1ʼ\2/g" \
         -e "s/(oughtn|Oughtn|OUGHTN)'(t|T)'(ve|VE)/\1ʼ\2ʼ\3/g" \
         -e "s/(oughtn|Oughtn|OUGHTN)'(t|T)/\1ʼ\2/g" \
         -e "s/(o|O)'(clock|CLOCK)/\1ʼ\2/g" \