From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 4 Nov 1999 20:42:27 +0000 (+0000)
Subject: (previous-matching-history-element)
X-Git-Tag: emacs-pretest-21.0.90~6175
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=12de1411b399f3cd4bd2c99c7bdf914e818de652;p=emacs.git

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

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))