aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--thogai.el5
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)))