emacs-elpa-diffs
[Top][All Lists]
Advanced

[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))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]