(isearch-complete-edit, isearch-ring-advance-edit):

Use erase-field instead of erase-buffer.

(isearch-complete-edit, isearch-ring-advance-edit):
Use erase-field instead of erase-buffer.
3157c24a · Gerd Moellmann · 5d7791b3 · 3157c24a
Commit 3157c24a authored Nov 03, 1999 by Gerd Moellmann
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/isearch.el lisp/isearch.el +2 -2

No files found.
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1324,7 +1324,7 @@ With prefix arg N, insert the Nth element."
 		 (mod (- (or yank-pointer 0) n)
 		      length)))

-      (erase-buffer)
+      (erase-field)
      (insert (nth yank-pointer ring))
      (goto-char (point-max)))))

@@ -1393,7 +1393,7 @@ If there is no completion possible, say so and continue searching."
  (setq isearch-string (buffer-string))
  (if (isearch-complete1)
      (progn
-	(erase-buffer)
+	(erase-field)
 	(insert isearch-string))))