[elpa] externals/consult 625edc0274: Revert "consult--async-split: Add field properties" (Fix #796)

[ELPA Syncer]

branch: externals/consult
commit 625edc0274674da64af7c1a4fd5988fece7933b5
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Revert "consult--async-split: Add field properties" (Fix #796)
    
    This reverts commit 53a1ed60252d58069f2245c2f7e0e05bf87b6758.
---
 consult.el | 14 ++++----------
 1 file changed, 4 insertions(+), 10 deletions(-)

diff --git a/consult.el b/consult.el
index cccf9dde17..64c10455dd 100644
--- a/consult.el
+++ b/consult.el
@@ -2075,18 +2075,12 @@ SPLIT is the splitting function."
                      (funcall split action))
                     (async-len (length async-str))
                     (input-len (length action))
-                    (prompt (minibuffer-prompt-end))
-                    (field-beg prompt)
-                    (field-idx 0))
+                    (end (minibuffer-prompt-end)))
          ;; Highlight punctuation characters
-         (remove-list-of-text-properties prompt (+ prompt input-len) '(face 
field))
+         (remove-list-of-text-properties end (+ end input-len) '(face))
          (dolist (hl highlights)
-           (put-text-property field-beg (+ prompt (cdr hl))
-                              'field field-idx)
-           (put-text-property (+ prompt (car hl)) (+ prompt (cdr hl))
-                              'face 'consult-async-split)
-           (setq field-beg (+ prompt (cdr hl))
-                 field-idx (1+ field-idx)))
+           (put-text-property (+ end (car hl)) (+ end (cdr hl))
+                              'face 'consult-async-split))
          (funcall async
                   ;; Pass through if the input is long enough!
                   (if (or force (>= async-len consult-async-min-input))