[elpa] externals/inspector e9b4f2e276 85/93: tests: adjustment

[ELPA Syncer]

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

    tests: adjustment
---
 inspector-tests.el | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/inspector-tests.el b/inspector-tests.el
index 97e9779a7e..f36289961c 100644
--- a/inspector-tests.el
+++ b/inspector-tests.el
@@ -243,19 +243,20 @@
 
 (ert-deftest inspector-tests--slices-test ()
   (let ((inspector-slice-size 10))
-    (inspector-inspect (cl-loop for i from 1 to 101 collect i))
+    (inspector-inspect (cl-loop for i from 1 to 400 collect i))
     (should (< (count-lines (point-min) (point-max)) 20))
     (inspector-quit))
 
   (let ((inspector-slice-size 100))
-    (inspector-inspect (cl-loop for i from 1 to 101 collect (cons i (1+ i))))
+    (inspector-inspect (cl-loop for i from 1 to 400 collect (cons i (1+ i))))
     (should (< (count-lines (point-min) (point-max)) 120))
     (inspector-quit))
 
-  (let ((inspector-slice-size 100))
-    (inspector-inspect (cl-loop for i from 1 to 101 collect (gensym) collect 
i))
-    (should (< (count-lines (point-min) (point-max)) 120))
-    (inspector-quit))
+  ;; property lists are not sliced for now ...
+  ;; (let ((inspector-slice-size 100))
+  ;;   (inspector-inspect (cl-loop for i from 1 to 400 collect (gensym) 
collect i))
+  ;;   (should (< (count-lines (point-min) (point-max)) 120))
+  ;;   (inspector-quit))
 
   (let ((inspector-slice-size 100))
     (inspector-inspect (apply #'vector (cl-loop for i from 1 to 1000 collect 
i)))