(previous-matching-history-element)

(next-history-element): Use delete-field instead of erase-field.

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/simple.el b/lisp/simple.el
index 1fb214cc6c0..6ba3783477b 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -747,7 +747,7 @@ See also `minibuffer-history-case-insensitive-variables'."
           (setq n (+ n (if (< n 0) 1 -1)))))
     (setq minibuffer-history-position pos)
     (goto-char (point-max))
-    (erase-field)
+    (delete-field)
     (let ((elt (nth (1- pos) history)))
       (insert (if (eq minibuffer-history-sexp-flag (minibuffer-depth))
                   (let ((print-level nil))
@@ -796,7 +796,7 @@ An uppercase letter in REGEXP makes the search case-sensitive."
         (if (> narg (length (symbol-value minibuffer-history-variable)))
             (error "Beginning of history; no preceding item"))
         (goto-char (point-max))
-        (erase-field)
+        (delete-field)
         (setq minibuffer-history-position narg)
         (cond ((= narg -1)
                (setq elt minibuffer-default))