aboutsummaryrefslogtreecommitdiff
path: root/test/helpful-unit-test.el
diff options
context:
space:
mode:
authorWilfred Hughes <me@wilfred.me.uk>2019-03-03 22:43:55 +0000
committerWilfred Hughes <me@wilfred.me.uk>2019-03-03 22:43:55 +0000
commita20eef8fd3fb33abe35dd2ed1590184bc2975b69 (patch)
treecfe0e567e5ec1060be594c0134749b8ca36f006f /test/helpful-unit-test.el
parent72e93276fc0032e434f2acf62d8d63d51557e55b (diff)
Always autoload callables if they aren't loaded0.16
Fixes #117
Diffstat (limited to 'test/helpful-unit-test.el')
-rw-r--r--test/helpful-unit-test.el11
1 files changed, 11 insertions, 0 deletions
diff --git a/test/helpful-unit-test.el b/test/helpful-unit-test.el
index bfe887c..0e660bb 100644
--- a/test/helpful-unit-test.el
+++ b/test/helpful-unit-test.el
@@ -880,3 +880,14 @@ find the source code."
(helpful--convert-c-name 'Fmake_string t))
(should-not
(helpful--convert-c-name 'Vgc_cons_percentage nil)))
+
+(ert-deftest helpful--loads-autoload-symbol ()
+ "When asked to describe an autoloaded symbol, just load it."
+ ;; This test assumes that you haven't loaded tetris.el.gz in your
+ ;; current instance.
+ (skip-unless (autoloadp (symbol-function 'tetris)))
+ ;; This is a regression test: `tetris' has `tetris-mode-map' in its
+ ;; docstring, so we can't display the mode map unless tetris.el.gz is
+ ;; loaded.
+ ;;
+ (helpful-function #'tetris))