branch: externals/cm-mode
commit 077d4967075cc88bc71c7315460e7ac4bf2bb47b
Author: Joost Kremers <[email protected]>
Commit: Joost Kremers <[email protected]>
cm-accept/reject-change-at-point: do not follow changes
---
cm-mode.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/cm-mode.el b/cm-mode.el
index efa00aac34..f0245f5c94 100644
--- a/cm-mode.el
+++ b/cm-mode.el
@@ -659,8 +659,9 @@ is NIL."
(throw 'quit nil)) ; get out
(cond
((memq action '(?a ?r ?d))
- (delete-region (third change) (fourth change))
- (insert (cm-substitution-string change action))
+ (cm-without-following-changes
+ (delete-region (third change) (fourth change))
+ (insert (cm-substitution-string change action)))
(point))
((memq action '(?s ?k))
(fourth change)))))))
