]> code.delx.au - gnu-emacs/blobdiff - lisp/textmodes/css-mode.el
Don't let `css--property-values' return duplicates
[gnu-emacs] / lisp / textmodes / css-mode.el
index 8a4daac353a15d61be9a47f578dd3912d7a4c183..608462b36a6244d5552a240ccd0b049398bc2482 100644 (file)
@@ -793,13 +793,14 @@ Completion candidates are looked up in `css-property-alist' by
 the string PROPERTY."
   (or (gethash property css--property-value-cache)
       (let ((values
-             (seq-mapcat
-              (lambda (value)
-                (if (stringp value)
-                    (list value)
-                  (or (css--value-class-lookup value)
-                      (css--property-values (symbol-name value)))))
-              (cdr (assoc property css-property-alist)))))
+             (seq-uniq
+              (seq-mapcat
+               (lambda (value)
+                 (if (stringp value)
+                     (list value)
+                   (or (css--value-class-lookup value)
+                       (css--property-values (symbol-name value)))))
+               (cdr (assoc property css-property-alist))))))
         (puthash property values css--property-value-cache))))
 
 (defun css--complete-property-value ()