[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master b22b1f9: Wrap skeleton logic in atomic-change-group
From: |
Lars Ingebrigtsen |
Subject: |
master b22b1f9: Wrap skeleton logic in atomic-change-group |
Date: |
Wed, 5 Aug 2020 10:07:54 -0400 (EDT) |
branch: master
commit b22b1f935d47c71b59d59da1b6d125635470beca
Author: Philip K <philip@warpmail.net>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Wrap skeleton logic in atomic-change-group
* lisp/skeleton.el (define-skeleton): Use an atomic change group
so that if the user `C-g's in the middle of it, we're not left
with half a skeleton in the buffer (bug#42311).
---
lisp/skeleton.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/skeleton.el b/lisp/skeleton.el
index 8c694c1..3609d6b 100644
--- a/lisp/skeleton.el
+++ b/lisp/skeleton.el
@@ -135,7 +135,8 @@ A prefix argument of -1 says to wrap around region, even if
not highlighted.
A prefix argument of zero says to wrap around zero words---that is, nothing.
This is a way of overriding the use of a highlighted region.")
(interactive "*P\nP")
- (skeleton-proxy-new ',skeleton str arg))))
+ (atomic-change-group
+ (skeleton-proxy-new ',skeleton str arg)))))
;;;###autoload
(defun skeleton-proxy-new (skeleton &optional str arg)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master b22b1f9: Wrap skeleton logic in atomic-change-group,
Lars Ingebrigtsen <=