Uniquify completion candidates of whole lines

If the same line is present more than once in the buffer, it will be
offered more than once as a candidate. This commit deletes duplicate
lines from the completion list.

Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
Rudi Grinberg 2019-07-27 14:41:40 +07:00
parent 8d388ebba9
commit 7c523f2c15

View file

@ -129,12 +129,13 @@ C-x C-l."
(`candidates (`candidates
(all-completions (all-completions
arg arg
(delete-dups
(split-string (split-string
(replace-regexp-in-string (replace-regexp-in-string
"^[\t\s]+" "" "^[\t\s]+" ""
(concat (buffer-substring-no-properties (point-min) (line-beginning-position)) (concat (buffer-substring-no-properties (point-min) (line-beginning-position))
(buffer-substring-no-properties (line-end-position) (point-max)))) (buffer-substring-no-properties (line-end-position) (point-max))))
"\\(\r\n\\|[\n\r]\\)" t))))) "\\(\r\n\\|[\n\r]\\)" t))))))
;;;###autoload ;;;###autoload
(defun +company/dict-or-keywords () (defun +company/dict-or-keywords ()