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

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

[elpa] externals/consult 1794377b1d: Swap save-excursion and save-restri


From: ELPA Syncer
Subject: [elpa] externals/consult 1794377b1d: Swap save-excursion and save-restriction
Date: Thu, 16 Feb 2023 16:57:28 -0500 (EST)

branch: externals/consult
commit 1794377b1d61f88e0af2e3dff033bd9832d274b8
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Swap save-excursion and save-restriction
---
 consult-register.el | 4 ++--
 consult.el          | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/consult-register.el b/consult-register.el
index 72f18670c8..47274eab5b 100644
--- a/consult-register.el
+++ b/consult-register.el
@@ -66,8 +66,8 @@ Each element of the list must have the form (char . name).")
 (cl-defmethod consult-register--describe ((val marker))
   "Describe marker register VAL."
   (with-current-buffer (marker-buffer val)
-    (save-restriction
-      (save-excursion
+    (save-excursion
+      (save-restriction
         (widen)
         (goto-char val)
         (let* ((line (line-number-at-pos))
diff --git a/consult.el b/consult.el
index 3582e36b82..da4201e192 100644
--- a/consult.el
+++ b/consult.el
@@ -864,8 +864,8 @@ Also temporarily increase the gc limit via 
`consult--with-increased-gc'."
   "Get marker in BUFFER from LINE and COLUMN."
   (when (buffer-live-p buffer)
     (with-current-buffer buffer
-      (save-restriction
-        (save-excursion
+      (save-excursion
+        (save-restriction
           (widen)
           (goto-char (point-min))
           ;; Location data might be invalid by now!



reply via email to

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