summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2023-12-08 07:35:45 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2023-12-08 07:35:45 +0100
commite6235535281cd7f40213ad78ed9f03e8d078fbff (patch)
tree46e413c7522aae461e18d8ed7fd07c440fc338fd
parentee571c70e6386d978bc9878c0012f70571a21ca5 (diff)
cape-company-to-capf: Do not delete duplicates
Duplicates are deleted by Capf UIs.
-rw-r--r--cape.el2
1 files changed, 0 insertions, 2 deletions
diff --git a/cape.el b/cape.el
index 00646eb..4c9ec3c 100644
--- a/cape.el
+++ b/cape.el
@@ -784,7 +784,6 @@ changed. The function `cape-company-to-capf' is experimental."
(when-let ((prefix (cape--company-call backend 'prefix))
(initial-input (if (stringp prefix) prefix (car-safe prefix))))
(let* ((end (point)) (beg (- end (length initial-input)))
- (dups (cape--company-call backend 'duplicates))
(valid (if (cape--company-call backend 'no-cache initial-input)
#'equal (or valid #'string-prefix-p)))
candidates)
@@ -798,7 +797,6 @@ changed. The function `cape-company-to-capf' is experimental."
beg end
(lambda (input)
(setq candidates (cape--company-call backend 'candidates input))
- (when dups (setq candidates (delete-dups candidates)))
(cons (apply-partially valid input) candidates)))
:category backend
:sort (not (cape--company-call backend 'sorted))))