[elpa] externals/inspector fdd7420b8d 43/93: More hash-table details

[ELPA Syncer]

branch: externals/inspector
commit fdd7420b8d203b819ede2b46a084af22390982ab
Author: Mariano Montone <marianomontone@gmail.com>
Commit: Mariano Montone <marianomontone@gmail.com>

    More hash-table details
---
 inspector.el | 22 ++++++++++++++--------
 1 file changed, 14 insertions(+), 8 deletions(-)

diff --git a/inspector.el b/inspector.el
index 7ff7713f88..db0cf09257 100644
--- a/inspector.el
+++ b/inspector.el
@@ -372,15 +372,21 @@ If LABEL has a value, then it is used as button label.  
Otherwise, button label
   (newline)
   (inspector--insert-label "Size")
   (insert (inspector--princ-to-string (hash-table-size hash-table)))
-  (newline 2)
-  (inspector--insert-label "Values")
   (newline)
-  (maphash (lambda (key value)
-             (inspector--insert-inspect-button key)
-             (insert ": ")
-             (inspector--insert-inspect-button value)
-             (newline))
-           hash-table))
+  (inspector--insert-label "Count")
+  (insert (inspector--princ-to-string (hash-table-count hash-table)))
+  (newline 2)
+  (if (zerop (hash-table-count hash-table))
+      (insert "The hash table is empty.")
+    (progn
+      (inspector--insert-label "Values")
+      (newline)
+      (maphash (lambda (key value)
+                (inspector--insert-inspect-button key)
+                (insert ": ")
+                (inspector--insert-inspect-button value)
+                (newline))
+               hash-table))))
 
 ;;--- Buffers ------------------------------