diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2023-01-01 05:46:24 -0500 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2023-01-01 05:46:24 -0500 |
| commit | 861d3db6343dcd793c54f79a38e0187b4755ee81 (patch) | |
| tree | 5b126c19f878df430395e1012f1891a7cf46d0a0 /test/lisp/emacs-lisp | |
| parent | 7822fcbebd1edba3654eaf5c1113f9d4049e0462 (diff) | |
| parent | 72a81e20226d2d0745fd2efdbbc80fdfe92b7cde (diff) | |
| download | emacs-861d3db6343dcd793c54f79a38e0187b4755ee81.tar.gz | |
Merge from origin/emacs-29
72a81e2022 ; * lisp/treesit.el (treesit-simple-indent-presets): Fix t...
ddfeee3e8a Build recipe interactively in treesit-install-language-gra...
6837469780 ; Add REVISION to treesit-language-source-alist
0dc788aa01 ; Remove GRAMMAR-DIR from treesit-language-source-alist
f9aef67c36 Tweak csharp-mode font-lock-settings (bug#60376)
46362c0a3a ; * doc/lispref/tips.texi (Documentation Tips): Add indexing.
9a386b682e Revert a recent change which causes errors
9871ee8b14 ; More fixes for documentation of 'defalias'
f309651b67 ; Fix handling of 'not' by 'buffer-match-p'
9292f595a7 ; Fix typos
43c7e05a2a Fix misspelled functions in shortdoc groups
01acecc79c Simplify introduction of use-package manual
2a7e072e53 ; Fix documentation of 'defalias'
eee2aeca25 Fix python-shell-buffer-substring when retrieving a single...
bfdad6c4e5 ; Fix recent treesit-related changes
Diffstat (limited to 'test/lisp/emacs-lisp')
| -rw-r--r-- | test/lisp/emacs-lisp/shortdoc-tests.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/shortdoc-tests.el b/test/lisp/emacs-lisp/shortdoc-tests.el index 8515b9fdfb9..3938902fa73 100644 --- a/test/lisp/emacs-lisp/shortdoc-tests.el +++ b/test/lisp/emacs-lisp/shortdoc-tests.el @@ -21,6 +21,7 @@ (require 'ert) (require 'shortdoc) +(require 'subr-x) ; `string-pad' in shortdoc group needed at run time (defun shortdoc-tests--tree-contains (tree fun) "Whether TREE contains a call to FUN." @@ -44,6 +45,14 @@ (should (shortdoc-tests--tree-contains expr fun)))) (setq props (cddr props)))))))) +(ert-deftest shortdoc-all-functions-fboundp () + "Check that all functions listed in shortdoc groups are `fboundp'." + (dolist (group shortdoc--groups) + (dolist (item group) + (when (consp item) + (let ((fun (car item))) + (should (fboundp fun))))))) + (ert-deftest shortdoc-all-groups-work () "Test that all defined shortdoc groups display correctly." (dolist (group (mapcar (lambda (x) (car x)) shortdoc--groups)) |