RET: Ignore current candidate if candidates are already selected

minad · Jul 6, 2021 · 12bf9c4 · 12bf9c4
1 parent 1956118
commit 12bf9c4
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/vertico-crm.el b/vertico-crm.el
@@ -127,8 +127,8 @@ See `completing-read-multiple' for the arguments."
                                "" ;; default
                                inherit-input-method)))
         (setq selected (mapcar #'substring-no-properties selected))
-        (unless (or (equal result "") (member result selected))
-          (setq selected (nconc selected (list result))))
+        (unless (or (equal result "") selected)
+          (setq selected (list result)))
         (set hist-sym (append selected hist-val))
         (when (consp def)
           (setq def (car def)))