(describe-variable): Remove hyperlinks in a

variable's value as these are quite frequently inappropriate.

1 files changed, 5 insertions, 2 deletions

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 4bf0a4775a0..c11aaf6da76 100644
--- 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))