[elpa] externals/seq 217517262b 12/20: Do not use map.el in seq-tests.el

[Stefan Monnier]

branch: externals/seq
commit 217517262b56a664e5d3845a835d28ff8b76e806
Author: Nicolas Petton <nicolas@petton.fr>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    Do not use map.el in seq-tests.el
    
    * packages/seq/tests/seq-tests.el: Do not use map.el.  map.el was
    introduced in Emacs 25.1, but seq.el is also available in GNU ELPA for
    Emacs 24.5.
---
 tests/seq-tests.el | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/tests/seq-tests.el b/tests/seq-tests.el
index 53930fa598..5d729b19be 100644
--- a/tests/seq-tests.el
+++ b/tests/seq-tests.el
@@ -352,14 +352,13 @@ Evaluate BODY for each created sequence.
 
 (ert-deftest test-seq-random-elt-take-all ()
   (let ((seq '(a b c d e))
-        (count '()))
-    (should (= 0 (map-length count)))
+        (elts '()))
+    (should (= 0 (length elts)))
     (dotimes (_ 1000)
       (let ((random-elt (seq-random-elt seq)))
-        (map-put count
-                 random-elt
-                 (map-elt count random-elt 0))))
-    (should (= 5 (map-length count)))))
+        (add-to-list 'elts
+                     random-elt)))
+    (should (= 5 (length elts)))))
 
 (ert-deftest test-seq-random-elt-signal-on-empty ()
   (should-error (seq-random-elt nil))