branch: externals/consult
commit 0127b52a97da30e30fea9605cf8f7e156052f366
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
Use completion--replace
---
consult.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/consult.el b/consult.el
index 6812e48590..e9e693c42e 100644
--- a/consult.el
+++ b/consult.el
@@ -2374,8 +2374,7 @@ These configuration options are supported:
predicate require-match
initial)))))))))
(if completion
(progn
- (delete-region start end)
- (insert (substring-no-properties completion))
+ (completion--replace start end completion)
(when-let (exit (plist-get completion-extra-properties
:exit-function))
(funcall exit completion
;; If completion is finished and cannot be further
completed,
