[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 2d6022a: Do not use map.el in seq-tests.el
From: |
Nicolas Petton |
Subject: |
[elpa] master 2d6022a: Do not use map.el in seq-tests.el |
Date: |
Wed, 16 Nov 2016 17:39:31 +0000 (UTC) |
branch: master
commit 2d6022ae4dc1c6a62b1e8ea796265881d399b371
Author: Nicolas Petton <address@hidden>
Commit: Nicolas Petton <address@hidden>
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.
---
packages/seq/tests/seq-tests.el | 11 +++++------
1 file changed, 5 insertions(+), 6 deletions(-)
diff --git a/packages/seq/tests/seq-tests.el b/packages/seq/tests/seq-tests.el
index 53930fa..5d729b1 100644
--- a/packages/seq/tests/seq-tests.el
+++ b/packages/seq/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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master 2d6022a: Do not use map.el in seq-tests.el,
Nicolas Petton <=