# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 974822313 0
# Node ID 8fc77111dd983b062fafe53d55917838a0f8eaad
# Parent  ec99a5f4085e977cb17a6844aad77cf4778cd304
(minibuffer-avoid-prompt): New function.

diff -r ec99a5f4085e -r 8fc77111dd98 lisp/simple.el
--- a/lisp/simple.el	Tue Nov 21 15:57:34 2000 +0000
+++ b/lisp/simple.el	Tue Nov 21 15:58:33 2000 +0000
@@ -686,6 +686,10 @@
 (defun minibuffer-history-initialize ()
   (setq minibuffer-text-before-history nil))
 
+(defun minibuffer-avoid-prompt (new old)
+  "A point-motion hook for the minibuffer, that moves point out of the prompt."
+  (constrain-to-field nil (point-max)))
+
 (defcustom minibuffer-history-case-insensitive-variables nil
   "*Minibuffer history variables for which matching should ignore case.
 If a history variable is a member of this list, then the