[Emacs-diffs] emacs-25 cd27f73: Say 'All results processed' at the end

[Dmitry Gutov]

branch: emacs-25
commit cd27f7396b77086b6c02eff5b2648bfba439d264
Author: Dmitry Gutov <address@hidden>
Commit: Dmitry Gutov <address@hidden>

    Say 'All results processed' at the end
    
    * lisp/progmodes/xref.el (xref--query-replace-1):
    Say 'All results processed' at the end if the user hadn't
    cancelled the process (bug#23284).
---
 lisp/progmodes/xref.el |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index f651dc9..05cd979 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -624,7 +624,9 @@ references displayed in the current *xref* buffer."
       (setq pairs (cdr buf-pairs))
       (setq continue
             (perform-replace from to t t nil nil multi-query-replace-map)))
-    (unless did-it-once (user-error "No suitable matches here"))))
+    (unless did-it-once (user-error "No suitable matches here"))
+    (when (and continue (not buf-pairs))
+      (message "All results processed"))))
 
 (defvar xref--xref-buffer-mode-map
   (let ((map (make-sparse-keymap)))