diff options
author | Richard M. Stallman <rms@gnu.org> | 1993-05-09 23:18:30 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1993-05-09 23:18:30 +0000 |
commit | 23261d8da9adc7fa9163288e6e24f971ecbaa95d (patch) | |
tree | 801a573e00390cd6a274b660e393c03ece258b8f /lisp/dabbrev.el | |
parent | f2dff6d025b82ebd95e08bb4fec2e99283e51a1d (diff) | |
download | emacs-23261d8da9adc7fa9163288e6e24f971ecbaa95d.tar.gz |
(dabbrev-expand): Delete a search-forward call
after the second replace-match.
Diffstat (limited to 'lisp/dabbrev.el')
-rw-r--r-- | lisp/dabbrev.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el index 0798b764c2b..db5fcacd077 100644 --- a/lisp/dabbrev.el +++ b/lisp/dabbrev.el @@ -186,7 +186,9 @@ with the next possible expansion not yet tried." ;; case pattern. (save-excursion (replace-match abbrev t 'literal)) - (search-forward abbrev) +;;; This used to be necessary, but no longer, +;;; because now point is preserved correctly above. +;;; (search-forward abbrev) (replace-match (if do-case (downcase expansion) expansion) (not do-case) 'literal)) |