[elpa] externals/trie a17e6df 056/111: Minor bug-fixes to [trie/dict-tree]--edebug-pretty-print

[Stefan Monnier]

branch: externals/trie
commit a17e6df104f1a1f9461c0668047767a5f4db3a14
Author: Toby S. Cubitt <toby-predictive@dr-qubit.org>
Commit: Toby S. Cubitt <toby-predictive@dr-qubit.org>

    Minor bug-fixes to [trie/dict-tree]--edebug-pretty-print
    to make them print "nil" instead of "()".
---
 trie.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/trie.el b/trie.el
index e3d3c71..5acb628 100644
--- a/trie.el
+++ b/trie.el
@@ -2,10 +2,10 @@
 ;;; trie.el --- trie package
 
 
-;; Copyright (C) 2008-2009 Toby Cubitt
+;; Copyright (C) 2008-2010 Toby Cubitt
 
 ;; Author: Toby Cubitt <toby-predictive@dr-qubit.org>
-;; Version: 0.2.3
+;; Version: 0.2.4
 ;; Keywords: trie, ternary search tree, completion
 ;; URL: http://www.dr-qubit.org/emacs.php
 
@@ -146,6 +146,9 @@
 
 
 ;;; Change Log:
+;; Version 0.2.4
+;; * minor bug-fix to `trie--edebug-pretty-print' to print "nil" instead
+;;   of "()"
 ;;
 ;; Version 0.2.3
 ;; * bug-fix in `trie--edebug-pretty-print'
@@ -1919,6 +1922,7 @@ elements that matched the corresponding groups, in order."
 (defun trie--edebug-pretty-print (object)
   (cond
    ((trie-p object) "#<trie>")
+   ((null object) "nil")
    ((let ((tlist object) (test t))
       (while (or (trie-p (car-safe tlist))
                 (and tlist (setq test nil)))