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

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

[elpa] externals/substitute ff63ce986f 06/39: Use more descriptive name


From: ELPA Syncer
Subject: [elpa] externals/substitute ff63ce986f 06/39: Use more descriptive name for local variable
Date: Mon, 16 Jan 2023 11:58:45 -0500 (EST)

branch: externals/substitute
commit ff63ce986fe587e244f9e0def810872d2cb30a40
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Use more descriptive name for local variable
---
 substitute.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/substitute.el b/substitute.el
index ae93ff12ec..cb9735eb86 100644
--- a/substitute.el
+++ b/substitute.el
@@ -155,15 +155,15 @@ This is the subroutine of `substitute-target' and 
related."
   (let (count)
     (save-excursion
       (save-restriction
-        (let ((search 're-search-forward)
+        (let ((search-direction-function 're-search-forward)
               (narrow (lambda () (widen) (goto-char (point-min)))))
           (pcase scope
             ('below (setq narrow (substitute--current-and-below-motion 
target)))
-            ('above (setq search 're-search-backward
+            ('above (setq search-direction-function 're-search-backward
                           narrow (substitute--current-and-above-motion 
target)))
             ('defun (setq narrow (substitute--current-defun))))
           (funcall narrow)
-          (while (funcall search target nil t)
+          (while (funcall search-direction-function target nil t)
             (push (match-string-no-properties 0) count)
             (replace-match sub nil t)))))
     (run-hook-with-args 'substitute-post-replace-hook



reply via email to

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