From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 4 Jun 1998 06:57:32 +0000 (+0000)
Subject: (esc-map): Bind C-M-% to query-replace-regexp.
X-Git-Tag: emacs-20.3~725
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cbc127de47c694456ea81e4fff1fb49098e0ab29;p=emacs.git

(esc-map): Bind C-M-% to query-replace-regexp.
---

diff --git a/lisp/replace.el b/lisp/replace.el
index 07d5892e458..e82eb3bdafb 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -115,6 +115,7 @@ and `\\=\\N' (where N is a digit) stands for
  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.