diff options
| author | Gerd Moellmann | 1999-11-03 16:26:28 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 1999-11-03 16:26:28 +0000 |
| commit | 3157c24a8e38094edca0f4bb81dcba64967d6f5f (patch) | |
| tree | f7936e4c49151c840f42a3781f15ebce4681f28d | |
| parent | 5d7791b36af115b25025ffa7cda363474a193f61 (diff) | |
| download | emacs-3157c24a8e38094edca0f4bb81dcba64967d6f5f.tar.gz emacs-3157c24a8e38094edca0f4bb81dcba64967d6f5f.zip | |
(isearch-complete-edit, isearch-ring-advance-edit):
Use erase-field instead of erase-buffer.
| -rw-r--r-- | lisp/isearch.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index 9333b7ca9a2..8f93bbfcab7 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -1324,7 +1324,7 @@ With prefix arg N, insert the Nth element." | |||
| 1324 | (mod (- (or yank-pointer 0) n) | 1324 | (mod (- (or yank-pointer 0) n) |
| 1325 | length))) | 1325 | length))) |
| 1326 | 1326 | ||
| 1327 | (erase-buffer) | 1327 | (erase-field) |
| 1328 | (insert (nth yank-pointer ring)) | 1328 | (insert (nth yank-pointer ring)) |
| 1329 | (goto-char (point-max))))) | 1329 | (goto-char (point-max))))) |
| 1330 | 1330 | ||
| @@ -1393,7 +1393,7 @@ If there is no completion possible, say so and continue searching." | |||
| 1393 | (setq isearch-string (buffer-string)) | 1393 | (setq isearch-string (buffer-string)) |
| 1394 | (if (isearch-complete1) | 1394 | (if (isearch-complete1) |
| 1395 | (progn | 1395 | (progn |
| 1396 | (erase-buffer) | 1396 | (erase-field) |
| 1397 | (insert isearch-string)))) | 1397 | (insert isearch-string)))) |
| 1398 | 1398 | ||
| 1399 | 1399 | ||