Skip to content

Commit 00c92c8

Browse files
yuhan0bbatsov
authored andcommitted
Use clojure--sym-regexp to detect fully-qualified syms
(not space) was too permissive and would include commas and other punctuation.
1 parent 16b2107 commit 00c92c8

File tree

1 file changed

+4
-2
lines changed

1 file changed

+4
-2
lines changed

cider-util.el

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -511,9 +511,11 @@ restore it properly when going back."
511511
(setq help-xref-stack-item item)))
512512

513513
(defcustom cider-doc-xref-regexp
514-
(rx (or (: "`" (group-n 1 (+ (not space))) "`") ; `var`
514+
(eval-and-compile
515+
(rx-to-string
516+
`(or (: "`" (group-n 1 (+ (not space))) "`") ; `var`
515517
(: "[[" (group-n 1 (+ (not space))) "]]") ; [[var]]
516-
(group-n 1 (+ (not space)) "/" (+ (not space))))) ; Fully qualified
518+
(group-n 1 (regexp ,clojure--sym-regexp) "/" (regexp ,clojure--sym-regexp))))) ;; Fully qualified
517519
"The regexp used to search Clojure vars in doc buffers."
518520
:type 'regexp
519521
:safe #'stringp

0 commit comments

Comments
 (0)