(while): Comment out converter.

[gnu-emacs] / lisp / replace.el

diff --git a/lisp/replace.el b/lisp/replace.el
index 488e1f196032a43713c4204942c54f87285fc55d..49f3920dded301a6b7b34f5b434eef9a58e1ea20 100644 (file)
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -393,7 +393,10 @@ The valid answers include `act', `skip', `act-and-show',
 (define-key query-replace-map "n" 'skip)
 (define-key query-replace-map "," 'act-and-show)
 (define-key query-replace-map "\e" 'exit)
+(define-key query-replace-map [escape] 'exit)
 (define-key query-replace-map "q" 'exit)
+(define-key query-replace-map "\r" 'exit)
+(define-key query-replace-map [return] 'exit)
 (define-key query-replace-map "." 'act-and-exit)
 (define-key query-replace-map "\C-r" 'edit)
 (define-key query-replace-map "\C-w" 'delete-and-edit)