[elpa] externals/cape 4a1f19af23 057/146: Fix super capf

[ELPA Syncer]

branch: externals/cape
commit 4a1f19af23e0c379da67897b166cd4ba7b81615d
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Fix super capf
---
 cape.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/cape.el b/cape.el
index 8195d67130..07f9fd116d 100644
--- a/cape.el
+++ b/cape.el
@@ -569,6 +569,7 @@ METADATA is optional completion metadata."
                        (setq prefix-len plen))
                       ((and (integerp prefix-len) (integerp plen))
                        (setq prefix-len (max prefix-len plen)))))))
+        (setq tables (nreverse tables))
         (list beg end
               (lambda (str pred action)
                 (if (eq action 'metadata)
@@ -577,8 +578,9 @@ METADATA is optional completion metadata."
                       (display-sort-function . identity)
                       (cycle-sort-function . identity))
                   (when (eq candidates 'init)
+                    (clrhash ht)
                     (setq candidates
-                          (cl-loop for (table . plist) in (nreverse tables) 
nconc
+                          (cl-loop for (table . plist) in tables nconc
                                    (let* ((pred (plist-get plist :predicate))
                                           (metadata (completion-metadata "" 
table pred))
                                           (sort (or (completion-metadata-get 
metadata 'display-sort-function)