diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2024-02-08 18:23:00 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2024-02-23 13:02:27 +0100 |
| commit | aa82fe9931851e66aa335e96ae35fd967951b281 (patch) | |
| tree | aa933129954ca43ba883ff0a77e5e0343cf389e0 /test/lisp/obarray-tests.el | |
| parent | 32843c7b36b8bf3dc9ac82059a1c3cab03cd8c98 (diff) | |
| download | emacs-aa82fe9931851e66aa335e96ae35fd967951b281.tar.gz emacs-aa82fe9931851e66aa335e96ae35fd967951b281.tar.bz2 emacs-aa82fe9931851e66aa335e96ae35fd967951b281.zip | |
Use obarray-make instead of make-vector to create obarrays
This prepares for the introduction of an actual obarray type.
* lisp/cedet/semantic/lex-spp.el (semantic-lex-spp-dynamic-map)
(semantic-lex-spp-dynamic-map-stack, semantic-lex-make-spp-table):
* lisp/cedet/semantic/lex.el (semantic-lex-make-keyword-table)
(semantic-lex-make-type-table):
* lisp/completion.el (cmpl-prefix-obarray, cmpl-obarray)
(clear-all-completions):
* lisp/emacs-lisp/checkdoc.el (checkdoc-defun-info):
* lisp/emacs-lisp/eldoc.el (eldoc-message-commands)
(eldoc-edit-message-commands):
* lisp/mail/mail-extr.el (mail-extr-all-top-level-domains):
* lisp/mail/rmailkwd.el (rmail-label-obarray):
* lisp/net/dns.el (dns-cache):
* lisp/net/eww.el (eww-suggested-uris):
* lisp/net/imap.el (imap-open, imap-mailbox-select-1)
(imap-message-copyuid-1, imap-message-appenduid-1):
* lisp/obsolete/pgg.el (pgg-passphrase-cache, pgg-pending-timers):
* lisp/play/cookie1.el (cookie-cache):
* lisp/progmodes/cc-defs.el (c-lang-constants, c-define-lang-constant):
* lisp/progmodes/cc-langs.el (c-keywords-obarray):
* lisp/vc/vc-hooks.el (vc-file-prop-obarray):
* test/lisp/obarray-tests.el (obarrayp-test):
* test/src/minibuf-tests.el (minibuf-tests--strings-to-obarray):
Use obarray-make instead of obarray-make.
Diffstat (limited to 'test/lisp/obarray-tests.el')
| -rw-r--r-- | test/lisp/obarray-tests.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/lisp/obarray-tests.el b/test/lisp/obarray-tests.el index d7e547fcf29..dd8f1c8abd4 100644 --- a/test/lisp/obarray-tests.el +++ b/test/lisp/obarray-tests.el @@ -32,7 +32,8 @@ (should-not (obarrayp "aoeu")) (should-not (obarrayp '())) (should-not (obarrayp [])) - (should (obarrayp (make-vector 7 0)))) + (should (obarrayp (obarray-make 7))) + (should (obarrayp (make-vector 7 0)))) ; for compatibility? (ert-deftest obarrayp-unchecked-content-test () "Should fail to check content of passed obarray." |