[elpa] master 58679af: [el-search] Also overwrite replaced matches automatically

[Michael Heerdegen]

branch: master
commit 58679af5073d5ab4d31de00faf7c285a19881d15
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    [el-search] Also overwrite replaced matches automatically
    
    * packages/el-search/el-search.el
    (el-search--search-and-replace-pattern): Automatically replace a match
    after editing it with e or E even if it had been replaced with the
    original replacement before.
---
 packages/el-search/el-search.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index 8209cd6..c36f852 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -4722,9 +4722,11 @@ Switch to driving search.  Useful to reposition search 
head.")))))))))
                                              (progn
                                                (funcall replace-or-restore)
                                                (undo-boundary))
-                                           (el-search--message-no-log
-                                            "Already replaced this match - hit 
r r to update")
-                                           (sit-for 2))))
+                                           ;; (el-search--message-no-log
+                                           ;;  "Already replaced this match - 
hit r r to update")
+                                           ;; (sit-for 2)
+                                           (funcall replace-or-restore)
+                                           (funcall replace-or-restore))))
                                      nil)))
                              (unwind-protect
                                  (while (not (pcase (funcall query)