Revert "company--multi-backend-adapter: Use each respective backend's prefix"

[gnu-emacs-elpa] / company.el

diff --git a/company.el b/company.el
index 3fa83534aab996420dc091b88be48c45b6b51c2c..9f13518f0ebb70957e0b588706453c05e6dcfbde 100644 (file)
--- a/company.el
+++ b/company.el
@@ -658,9 +658,9 @@ keymap during active completions (`company-active-map'):
     (case command
       (candidates
        (loop for backend in backends
-             for prefix = (funcall backend 'prefix)
-             when prefix
-             append (funcall backend 'candidates prefix)))
+             when (equal (funcall backend 'prefix)
+                         (car args))
+             append (apply backend 'candidates args)))
       (sorted nil)
       (duplicates t)
       (otherwise