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

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ebdb 10b0fa4 057/350: Use save-excursion in ebdb-toggle


From: Eric Abrahamsen
Subject: [elpa] externals/ebdb 10b0fa4 057/350: Use save-excursion in ebdb-toggle-all-record-marks
Date: Mon, 14 Aug 2017 11:46:02 -0400 (EDT)

branch: externals/ebdb
commit 10b0fa433f530b88d62bd5e22ae4ef58950e5d1a
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>

    Use save-excursion in ebdb-toggle-all-record-marks
    
    * ebdb-com.el (ebdb-toggle-all-record-marks): Leave point where it is.
---
 ebdb-com.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/ebdb-com.el b/ebdb-com.el
index 47870fd..18088af 100644
--- a/ebdb-com.el
+++ b/ebdb-com.el
@@ -1276,10 +1276,11 @@ With prefix N move backwards N (sub)fields."
 (defun ebdb-toggle-all-record-marks ()
   "Reverse the marked status of all records."
   (interactive)
-  (mapcar
-   (lambda (rec)
-     (ebdb-toggle-record-mark rec 'mark))
-   ebdb-records))
+  (save-excursion
+    (mapcar
+     (lambda (rec)
+       (ebdb-toggle-record-mark rec 'mark))
+     ebdb-records)))
 
 (defun ebdb-unmark-all-records ()
   "Remove the mark from all records."



reply via email to

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