[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/vm 1e96a3c67b 2/2: Merge branch 'main' into 'main'
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/vm 1e96a3c67b 2/2: Merge branch 'main' into 'main' |
Date: |
Sat, 12 Apr 2025 19:01:12 -0400 (EDT) |
branch: elpa/vm
commit 1e96a3c67baa0c6e7015a3fb2957845488d05da0
Merge: 47f60c5f14 83b307a832
Author: Mark Diekhans <markd@ucsc.edu>
Commit: Mark Diekhans <markd@ucsc.edu>
Merge branch 'main' into 'main'
fixed thread display causes by not correcly save current point (fixes #492)
Closes #492
See merge request emacs-vm/vm!39
---
lisp/vm-message.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/lisp/vm-message.el b/lisp/vm-message.el
index 5c88edc78a..d3e24dfac6 100644
--- a/lisp/vm-message.el
+++ b/lisp/vm-message.el
@@ -728,11 +728,12 @@ works in all VM buffers."
(defun vm-find-and-set-text-of (m)
(with-current-buffer (vm-buffer-of m)
- (save-restriction
- (widen)
- (goto-char (vm-headers-of m))
- (search-forward "\n\n" (vm-text-end-of m) 0)
- (vm-set-text-of m (point-marker)))))
+ (save-excursion
+ (save-restriction
+ (widen)
+ (goto-char (vm-headers-of m))
+ (search-forward "\n\n" (vm-text-end-of m) 0)
+ (vm-set-text-of m (point-marker))))))
(defsubst vm-virtual-message-p (m)
(not (eq m (vm-real-message-of m))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/vm 1e96a3c67b 2/2: Merge branch 'main' into 'main',
ELPA Syncer <=