Add entry for `minibuffer-prompt-properties'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 80099608acc1e5cc3f69f6457d8d5294e6d7ca18..107634bf8b2eb242eae7508a7ba617fc6d9c6036 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2000-11-22  Miles Bader  <miles@gnu.org>
+
+       * cus-start.el: Add entry for `minibuffer-prompt-properties'.
+       * simple.el (minibuffer-avoid-prompt): New function.
+
 2000-11-21  Gerd Moellmann  <gerd@gnu.org>
 
        * Makefile.in (.SUFFIXES): Add .SUFFIXES.

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 620a870090bd00b164247a9615863c4e2fedfbe9..1dbed46d4be0f64e4c20fb05b307704203ffaf0f 100644 (file)
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -156,6 +156,26 @@
             ;; minibuf.c
             (completion-auto-help minibuffer boolean)
             (enable-recursive-minibuffers minibuffer boolean)
+            (minibuffer-prompt-properties
+             minibuffer
+             (list
+              (checklist :inline t
+                         (const :tag "Read-Only"
+                                :doc "Prevent prompt from being modified"
+                                :format "%t%n%h"
+                                :inline t
+                                (read-only t))
+                         (const :tag "Inviolable"
+                                :doc "Prevent point from ever entering prompt"
+                                :format "%t%n%h"
+                                :inline t
+                                (point-entered minibuffer-avoid-prompt)))
+              (repeat :inline t
+                      :tag "Other Properties"
+                      (list :inline t
+                            :format "%v"
+                            (symbol :tag "Property")
+                            (sexp :tag "Value")))))
             (minibuffer-auto-raise minibuffer boolean)
             ;; msdos.c
             (dos-unsupported-char-glyph display integer)