[elpa] externals/dict-tree f4aa81c 059/154: Disable caching for unnamed meta-dicts

[Stefan Monnier]

branch: externals/dict-tree
commit f4aa81c8ad966aa0bce010f6d54f7b2cc19b5070
Author: Toby Cubitt <toby-predictive@dr-qubit.org>
Commit: tsc25 <toby-predictive@dr-qubit.org>

    Disable caching for unnamed meta-dicts
---
 dict-tree.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/dict-tree.el b/dict-tree.el
index 3c6cf84..bee0630 100644
--- a/dict-tree.el
+++ b/dict-tree.el
@@ -824,7 +824,9 @@ dictionaries. It is passed two pieces of data, each an
 association of the same key, but in different dictionaries. It
 should return a combined data.
 
-The other arguments are as for `dictree-create'."
+The other arguments are as for `dictree-create'. Note that
+caching is only possible if NAME is supplied, otherwise the
+cache-threshold arguments are ignored."
 
   ;; sadly, passing null values over-rides the defaults in the defstruct
   ;; `dictree--create', so we have to explicitly set the defaults again here
@@ -840,11 +842,11 @@ The other arguments are as for `dictree-create'."
          autosave unlisted
          combine-function
          cache-policy cache-update-policy
-         lookup-cache-threshold
-         complete-cache-threshold
-         complete-ranked-cache-threshold
-         wildcard-cache-threshold
-         wildcard-ranked-cache-threshold)
+         (when name lookup-cache-threshold)
+         (when name complete-cache-threshold)
+         (when name complete-ranked-cache-threshold)
+         (when name wildcard-cache-threshold)
+         (when name wildcard-ranked-cache-threshold))
         ))
     ;; store dictionary in variable NAME
     (when name (set name dict))