only crosslink exported symbols

2025-10-13 13:13:03 +00:00 · 2013-11-28 22:42:06 -05:00 · 2013-11-28 22:42:06 -05:00 · f86529c96f
commit f86529c96f
parent 21914cfe32
1 changed files with 3 additions and 7 deletions
--- a/doc/yas-doc-helper.el
+++ b/doc/yas-doc-helper.el
@ -77,14 +77,10 @@
                  #'(lambda (match)
                      (let* ((name (downcase (match-string 1 match)))
                             (sym (intern name)))
-                        (if (and (or (boundp sym)
-                                     (fboundp sym))
-                                 (save-match-data
-                                   (string-match "^yas-" name)))
-                            (format "[[#%s][=%s=]]"
-                                    name name)
+                        (if (memq sym yas--exported-syms)
+                            (format "[[#%s][=%s=]]" name name)
                          (format "=%s=" name))))
-                  body))
+                  body t))
      ;; output the paragraph
      ;;
      (concat-lines heading