branch: elpa/parseedn commit 7f38ea08b44691bd9ee13d3d539f2c9380d5c07f Author: tmpUser2022 <98637343+tmpuser2...@users.noreply.github.com> Commit: GitHub <nore...@github.com>
Fix empty hash Before: `(parseedn-print-str #s(hash-table size 0 data ())) ;; => "{nil nil}"` After: `(parseedn-print-str #s(hash-table size 0 data ())) ;; => "{}"` --- parseedn.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/parseedn.el b/parseedn.el index 1e06e54218..6e93399f91 100644 --- a/parseedn.el +++ b/parseedn.el @@ -165,7 +165,7 @@ TAG-READERS is an optional association list. For more information, see (defun parseedn-print-hash-or-alist (map &optional ks) "Insert hash table MAP or elisp alist as an EDN map into the current buffer." - (let ((keys (or ks (map-keys map)))) + (when-let ((keys (or ks (map-keys map)))) (parseedn-print (car keys)) (insert " ") (parseedn-print (map-elt map (car keys)))