Handle compiled functions, or functions with only usage specified.

1 files changed, 9 insertions, 0 deletions

diff --git a/test/unit-test.el b/test/unit-test.el
index ca31de4..a63fc8d 100644
--- a/test/unit-test.el
+++ b/test/unit-test.el
@@ -37,3 +37,12 @@
 (ert-deftest helpful--no-docstring ()
   "We should not crash on a function without a docstring."
   (should (null (helpful--docstring #'test-foo-no-docstring))))
+
+(defun test-foo-usage-docstring ()
+  "\n\n(fn &rest ARGS)"
+  nil)
+
+(ert-deftest helpful--usage-docstring ()
+  "If a function docstring only has usage, do not return it."
+  (should (null (helpful--docstring #'test-foo-usage-docstring))))
+