changeset 22353:402ebb81ae84

(esc-map): Bind C-M-% to query-replace-regexp.
author Karl Heuer <kwzh@gnu.org>
date Thu, 04 Jun 1998 06:57:32 +0000
parents 312d6d72be14
children 2319cdbf38e5
files lisp/replace.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/replace.el	Thu Jun 04 06:47:29 1998 +0000
+++ b/lisp/replace.el	Thu Jun 04 06:57:32 1998 +0000
@@ -115,6 +115,7 @@
  whatever what matched the Nth `\\(...\\)' in REGEXP."
   (interactive (query-replace-read-args "Query replace regexp" t))
   (perform-replace regexp to-string t t arg))
+(define-key esc-map [?\C-%] 'query-replace-regexp)
 
 (defun map-query-replace-regexp (regexp to-strings &optional arg)
   "Replace some matches for REGEXP with various strings, in rotation.