diff options
| author | Brian Preble <rassilon@gnu.org> | 1991-05-13 22:05:10 +0000 |
|---|---|---|
| committer | Brian Preble <rassilon@gnu.org> | 1991-05-13 22:05:10 +0000 |
| commit | c5b1abe440c69393f3be34edc6dfa20cab5135ab (patch) | |
| tree | 717f6e9d99892df80bf6e8ab3a1e6cd41deb79fb /lisp/replace.el | |
| parent | ab6404f6b6cd33a9fb57e13612ecfe70487c2299 (diff) | |
| download | emacs-c5b1abe440c69393f3be34edc6dfa20cab5135ab.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index c32abcefc06..f5895e1d89d 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -18,8 +18,9 @@ ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. -;;;###autoload (defconst case-replace t "\ -;;;###autoload *Non-nil means query-replace should preserve case in replacements.") +;;;###autoload +(defconst case-replace t "\ +*Non-nil means query-replace should preserve case in replacements.") ;;;###autoload (defun query-replace (from-string to-string &optional arg) @@ -34,7 +35,8 @@ only matches surrounded by word boundaries." (interactive "sQuery replace: \nsQuery replace %s with: \nP") (perform-replace from-string to-string t nil arg) (message "Done")) -;;;###autoload (define-key esc-map "%" 'query-replace) +;;;###autoload +(define-key esc-map "%" 'query-replace) ;;;###autoload (defun query-replace-regexp (regexp to-string &optional arg) |