Stricter regexps for highlighting `foo' in docstrings

Previously, the regexp was greedy, so we would erroneously highlight:

`foo `bar'

as a single symbol. Fixes #87.

1 files changed, 12 insertions, 0 deletions

diff --git a/test/unit-test.el b/test/unit-test.el
index db75500..2579316 100644
--- a/test/unit-test.el
+++ b/test/unit-test.el
@@ -27,6 +27,18 @@
     (helpful--docstring #'test-foo t)
     "Docstring here.")))
 
+(ert-deftest helpful--docstring-symbol ()
+  "Correctly handle quotes around symbols."
+  ;; We should replace quoted symbols with links, so the punctuation
+  ;; should not be in the output.
+  (let* ((formatted-docstring (helpful--format-docstring "`message'")))
+    (should
+     (equal formatted-docstring "message")))
+  ;; We should handle stray backquotes.
+  (let* ((formatted-docstring (helpful--format-docstring "`foo `message'")))
+    (should
+     (equal formatted-docstring "`foo message"))))
+
 (ert-deftest helpful--docstring-unescape ()
   "Discard \\=\\= in docstrings."
   (let* ((docstring (helpful--docstring #'apply t))