diff options
| -rw-r--r-- | thogai.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/thogai.el b/thogai.el index 7637ab4..06db17c 100644 --- a/thogai.el +++ b/thogai.el @@ -267,6 +267,11 @@ External callers should always pass nil as the value." (string-remove-prefix "{~|" (string-remove-suffix "}" translation)) non-first-part-p)) (setq thogai-capitalize-next-word capitalization-state))) + ;; Suffix and carry capitalization. + ((pred (lambda (str) + (string-prefix-p "{^~|" str))) + (thogai-insert-translation + (concat "{^}{" (string-remove-prefix "{^" translation)))) ;; Glue operator ((pred (lambda (str) (string-prefix-p "{&" str))) |