branch: externals/auctex
commit 18a3dc7b436fd366a5581726f543980b7859eaff
Author: Paul Nelson <ultr...@gmail.com>
Commit: Arash Esbati <ar...@gnu.org>
Make preview section commands preserve mark
* preview.el (preview-section, preview-clearout-section):
Change `save-excursion' to `save-mark-and-excursion'.
(bug#70379)
---
preview.el.in | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/preview.el.in b/preview.el.in
index 5ea185f148..5625d9c02f 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -2238,7 +2238,7 @@ with a `timestamp' property of it are kept."
(defun preview-clearout-section ()
"Clearout previews from LaTeX section."
(interactive)
- (save-excursion
+ (save-mark-and-excursion
(LaTeX-mark-section)
(preview-clearout (region-beginning) (region-end))))
@@ -4142,7 +4142,7 @@ environments is selected."
(defun preview-section ()
"Run preview on LaTeX section." (interactive)
- (save-excursion
+ (save-mark-and-excursion
(LaTeX-mark-section)
(preview-region (region-beginning) (region-end))))
