From c02e996e47b3778b83a726b6876a03bcb3bec986 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 5 Oct 2006 12:20:14 +0000 Subject: [PATCH] (auto-composition-after-change): Remove `auto-composed' property instead of put nil to it. (toggle-auto-composition): Likewise. --- lisp/composite.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/composite.el b/lisp/composite.el index ddf56d35434..b7a4caab726 100644 --- a/lisp/composite.el +++ b/lisp/composite.el @@ -543,7 +543,7 @@ Auto Composition mode in all buffers (this is the default)." end (1+ end)) (setq func2 nil)))) (if (< start end) - (put-text-property start end 'auto-composed nil)))))) + (remove-text-properties start end '(auto-composed nil))))))) (defun turn-on-auto-composition-if-enabled () (if enable-multibyte-characters @@ -576,7 +576,8 @@ With arg, enable it iff arg is positive." (save-buffer-state nil (save-restriction (widen) - (put-text-property (point-min) (point-max) 'auto-composed nil))))) + (remove-text-properties (point-min) (point-max) + '(auto-composed nil)))))) (defun auto-compose-region (from to) "Force automatic character composition on the region FROM and TO." -- 2.39.2