From 2581beba6580e0928cd5076b3437ff27d6da0131 Mon Sep 17 00:00:00 2001 From: "Basil L. Contovounesios" Date: Wed, 9 Dec 2020 00:54:34 +0000 Subject: [PATCH] Make abbrev-tests.el more deterministic * test/lisp/abbrev-tests.el (abbrev--table-symbols-test): Don't rely on order of symbols in obarray. --- test/lisp/abbrev-tests.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/test/lisp/abbrev-tests.el b/test/lisp/abbrev-tests.el index aaf1d4a5b5c..288ea1ae987 100644 --- a/test/lisp/abbrev-tests.el +++ b/test/lisp/abbrev-tests.el @@ -69,8 +69,9 @@ (define-abbrev ert-test-abbrevs "sys" "system abbrev" nil :system t) (should (equal (mapcar #'symbol-name (abbrev--table-symbols 'ert-test-abbrevs)) '("a-e-t"))) - (should (equal (mapcar #'symbol-name (abbrev--table-symbols 'ert-test-abbrevs t)) - '("a-e-t" "sys"))))) + (let ((syms (abbrev--table-symbols 'ert-test-abbrevs t))) + (should (equal (sort (mapcar #'symbol-name syms) #'string<) + '("a-e-t" "sys")))))) (ert-deftest abbrev-table-get-put-test () (let ((table (make-abbrev-table))) -- 2.39.2