Mercurial > emacs
changeset 5309:dc1a3f9ea36d
(hide-bibtex-entry-bodies): Don't use replace-regexp.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 23 Dec 1993 04:54:37 +0000 |
| parents | f14639c69ed3 |
| children | fe3bea12d381 |
| files | lisp/textmodes/bibtex.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/bibtex.el Thu Dec 23 04:53:48 1993 +0000 +++ b/lisp/textmodes/bibtex.el Thu Dec 23 04:54:37 1993 +0000 @@ -797,7 +797,10 @@ (if arg (subst-char-in-region (point) (point-max) ?\r ?\n t) (while (save-excursion (re-search-forward "\n[^@]" (point-max) t)) - (save-excursion (replace-regexp "\n\\([^@]\\)" "\r\\1")))) + ;; (save-excursion (replace-regexp "\n\\([^@]\\)" "\r\\1")) + (save-excursion + (while (re-search-forward "\n\\([^@]\\)" nil t) + (replace-match "\r\\1" nil nil))))) (setq selective-display (not arg)) (set-buffer-modified-p modifiedp))))