Mercurial > emacs
changeset 40255:ad4ee591fe2f
Adapt to change in perform-replace.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Wed, 24 Oct 2001 12:37:08 +0000 |
| parents | 51c9985454e3 |
| children | 561bc8b0392f |
| files | lisp/progmodes/ebrowse.el lisp/progmodes/etags.el |
| diffstat | 2 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/ebrowse.el Wed Oct 24 12:35:48 2001 +0000 +++ b/lisp/progmodes/ebrowse.el Wed Oct 24 12:37:08 2001 +0000 @@ -1,6 +1,7 @@ ;;; ebrowse.el --- Emacs C++ class browser & tags facility -;; Copyright (C) 1992, 93, 94, 95, 96, 97, 98, 99, 2000 Free Software Foundation Inc. +;; Copyright (C) 1992, 93, 94, 95, 96, 97, 98, 99, 2000, 2001 +;; Free Software Foundation Inc. ;; Author: Gerd Moellmann <gerd@gnu.org> ;; Maintainer: FSF @@ -3818,7 +3819,7 @@ (setq ebrowse-tags-loop-form (list 'and (list 'save-excursion (list 're-search-forward from nil t)) - (list 'not (list 'perform-replace from to nil nil t t nil)))) + (list 'not (list 'perform-replace from to t t nil)))) (ebrowse-tags-loop-continue 'first-time))
--- a/lisp/progmodes/etags.el Wed Oct 24 12:35:48 2001 +0000 +++ b/lisp/progmodes/etags.el Wed Oct 24 12:37:08 2001 +0000 @@ -1,4 +1,5 @@ ;;; etags.el --- etags facility for Emacs + ;; Copyright (C) 1985, 86, 88, 89, 92, 93, 94, 95, 96, 98, 2000, 2001 ;; Free Software Foundation, Inc. @@ -1743,7 +1744,7 @@ ;; will see it. '(goto-char (match-beginning 0)))) tags-loop-operate (list 'perform-replace - (list 'quote from) (list 'quote to) nil nil + (list 'quote from) (list 'quote to) t t (list 'quote delimited))) (tags-loop-continue (or file-list-form t)))