[elpa] externals/el-search 9e95e79 325/332: [el-search] Also overwrite replaced matches automatically

[Stefan Monnier]

branch: externals/el-search
commit 9e95e792560063316b5c5cc243a4348f590b1cb3
Author: Michael Heerdegen <michael_heerdegen@web.de>
Commit: Michael Heerdegen <michael_heerdegen@web.de>

    [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.
---
 el-search.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/el-search.el b/el-search.el
index 8209cd6..c36f852 100644
--- a/el-search.el
+++ b/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)