[elpa] externals/minibuffer-header 43712af40f 2/2: Simplified prompt capture

[ELPA Syncer]

branch: externals/minibuffer-header
commit 43712af40f6fe6e2747cec3aec62873c1629abfd
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Simplified prompt capture
---
 minibuffer-header.el | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

diff --git a/minibuffer-header.el b/minibuffer-header.el
index 33e550c076..a34450f0ac 100644
--- a/minibuffer-header.el
+++ b/minibuffer-header.el
@@ -112,15 +112,9 @@
   (save-excursion
     (goto-char (point-min))
     (let* ((inhibit-read-only t)
+           (prompt (substring-no-properties (minibuffer-prompt)))
               (prompt-beg (point-min))
-           (prompt-end nil)
-           (prompt-end (or prompt-end
-                           (save-excursion (search-forward-regexp ":[ \t]*" 
nil t))))
-           (prompt-end (or prompt-end
-                           (next-property-change (+ 1 (point-min)))))
-           (prompt-end (or prompt-end
-                           (point-max)))           
-           (prompt (buffer-substring-no-properties prompt-beg prompt-end))
+           (prompt-end (+ 1 (length prompt)))
            (left (if (stringp 'minibuffer-header-format)
                      minibuffer-header-format
                  (funcall minibuffer-header-format prompt)))