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

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

[elpa] externals/substitute 18c9830a5c 36/39: Rename private function fo


From: ELPA Syncer
Subject: [elpa] externals/substitute 18c9830a5c 36/39: Rename private function for clarity
Date: Mon, 16 Jan 2023 11:58:52 -0500 (EST)

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

    Rename private function for clarity
---
 substitute.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/substitute.el b/substitute.el
index 23be368ce9..219e7aceda 100644
--- a/substitute.el
+++ b/substitute.el
@@ -76,7 +76,7 @@ Possible meaningful values for SCOPE are:
     ('defun "in the current DEFUN")
     (_ "across the BUFFER")))
 
-(defun substitute--pretty-target (target)
+(defun substitute--prettify-target-description (target)
   "Remove regexp delimiters from TARGET.
 Use this to produce a more readable version of TARGET for prompts
 and related."
@@ -91,7 +91,7 @@ and related."
 
 (defun substitute--prompt-without-highlight (target scope)
   "Prompt for string while referencing TARGET and SCOPE."
-  (let ((pretty-target (substitute--pretty-target target)))
+  (let ((pretty-target (substitute--prettify-target-description target)))
     (read-string
      (format "Replace `%s' %s with: "
              (propertize pretty-target 'face 'error)
@@ -104,7 +104,7 @@ and related."
   "Prompt for string while referencing TARGET and SCOPE.
 Highlight the TARGET's matching occurences per the user option
 `substitute-highlight'."
-  (let ((pretty-target (substitute--pretty-target target)))
+  (let ((pretty-target (substitute--prettify-target-description target)))
     (unwind-protect
         (progn
           (highlight-regexp target (substitute--determine-face))
@@ -237,7 +237,7 @@ boundaries." doc)
   "Print message of substitution.
 Report COUNTth substitutions of TARGET with SUB in SCOPE."
   (message "Substituted `%s' with `%s' %d times %s"
-           (propertize (substitute--pretty-target target) 'face 'error)
+           (propertize (substitute--prettify-target-description target) 'face 
'error)
            (propertize sub 'face 'success)
            count
            (propertize scope 'face 'warning)))



reply via email to

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