# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 932727575 0
# Node ID dedb4554866305a69b572ac263410bbfa5b85c9c
# Parent  5312a58f339748b7394e2fcb0b3f403c0c637822
(next-history-element): Set point to the end of the
prompt if minibuffer-prompt-in-buffer.

diff -r 5312a58f3397 -r dedb45548663 lisp/simple.el
--- a/lisp/simple.el	Fri Jul 23 08:46:55 1999 +0000
+++ b/lisp/simple.el	Fri Jul 23 10:59:35 1999 +0000
@@ -824,7 +824,9 @@
 	     (let ((print-level nil))
 	       (prin1-to-string elt))
 	   elt))
-	(goto-char (point-min)))))
+	(if (boundp 'minibuffer-prompt-in-buffer)
+	    (goto-char (minibuffer-prompt-width))
+	  (goto-char (point-min))))))
 
 (defun previous-history-element (n)
   "Inserts the previous element of the minibuffer history into the minibuffer."