branch: externals/dict-tree
commit 35346a4eba79b5529ba55adde9c48f352dc9ec98
Author: Toby Cubitt <toby-predict...@dr-qubit.org>
Commit: tsc25 <toby-predict...@dr-qubit.org>
Bug-fix in dictree--write-dict-code
---
dict-tree.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/dict-tree.el b/dict-tree.el
index 3d40142..d0b3f7d 100644
--- a/dict-tree.el
+++ b/dict-tree.el
@@ -2505,8 +2505,8 @@ is the prefix argument."
(insert "(setq " dictname " '" (prin1-to-string tmpdict) ")\n"))
;; if dictionary doesn't use any custom save functions, tmpdict's trie
;; is identical to original dict, so transform it back to usable form
- (when (or (dictree--data-savefun dict)
- (dictree--plist-savefun dict))
+ (unless (or (dictree--data-savefun dict)
+ (dictree--plist-savefun dict))
(trie-transform-from-read (dictree--trie tmpdict))))
(insert "(trie-transform-from-read (dictree--trie " dictname "))\n")
(when hashcode (insert hashcode))
