# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 941748147 0
# Node ID e3e54e862d5f9469d1674bb56807ad0e32b4ce3f
# Parent  10cb17dccd20d5944b12a70e0d67a2cd866adeea
(previous-matching-history-element)
(next-history-element): Use delete-field instead of erase-field.

diff -r 10cb17dccd20 -r e3e54e862d5f lisp/simple.el
--- a/lisp/simple.el	Thu Nov 04 20:30:49 1999 +0000
+++ b/lisp/simple.el	Thu Nov 04 20:42:27 1999 +0000
@@ -747,7 +747,7 @@
 	  (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 @@
 	(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))