changeset 2713:fd3e1f2d7ae5

(dabbrev-expand): Delete a search-forward call after the second replace-match.
author Richard M. Stallman <rms@gnu.org>
date Sun, 09 May 1993 23:18:30 +0000
parents 8291de1718d4
children bfe999b19082
files lisp/dabbrev.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/dabbrev.el	Sun May 09 23:16:19 1993 +0000
+++ b/lisp/dabbrev.el	Sun May 09 23:18:30 1993 +0000
@@ -186,7 +186,9 @@
 	;; 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))