(describe-variable): Remove hyperlinks in a

variable's value as these are quite frequently inappropriate.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 4bf0a4775a083f65798352345fb3a40ca833d655..c11aaf6da76cb0e6cde4d22786b33fe37d0cc5f3 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -535,7 +535,9 @@ it is displayed along with the global value."
                (terpri)
                (let ((from (point)))
                  (pp val)
-                 (help-xref-on-pp from (point))
+                 ;; Hyperlinks in variable's value are quite frequently
+                 ;; inappropriate e.g C-h v <RET> features <RET>
+                 ;; (help-xref-on-pp from (point))
                  (if (< (point) (+ from 20))
                      (delete-region (1- from) from)))))
            (terpri)
@@ -556,7 +558,8 @@ it is displayed along with the global value."
                    ;; sensible size before prettyprinting.  -- fx
                    (let ((from (point)))
                      (pp val)
-                     (help-xref-on-pp from (point))
+                     ;; See previous comment for this function.
+                     ;; (help-xref-on-pp from (point))
                      (if (< (point) (+ from 20))
                        (delete-region (1- from) from))))))
              (terpri))