company-capf: strip duplicates

diff --git a/company-capf.el b/company-capf.el
index f0e5d1b01bea619bb229d659b868064c2a9ed4e5..17ebf7cb538208b311ebbf826693fa399b660836 100644 (file)
--- a/company-capf.el
+++ b/company-capf.el
@@ -90,8 +90,9 @@ Requires Emacs 24.1 or newer."
             (text-property-not-all start (length arg)
                                    'face value arg))
           (length arg)))))
-    (`duplicates nil) ;Don't bother.
-    (`no-cache t)     ;FIXME: Improve!
+    (`duplicates t) ;Don't bother.
+    (`no-cache t)   ;Not much can be done here, as long as we handle
+                    ;non-prefix matches.
     (`meta
      (let ((f (plist-get (nthcdr 4 (company--capf-data)) :company-docsig)))
        (when f (funcall f arg))))