diff options
author | Nick Roberts <nickrob@snap.net.nz> | 2005-05-19 00:13:09 +0000 |
---|---|---|
committer | Nick Roberts <nickrob@snap.net.nz> | 2005-05-19 00:13:09 +0000 |
commit | 1bd539774234c7752daf9ee8cc39beb5916513b2 (patch) | |
tree | 94f6a1a0dcd13299606fbaadaa80ad64a2b55996 /lisp/help-fns.el | |
parent | 2dade9c6789ca8a68fb86413e2a7ab7d197fa1e5 (diff) | |
download | emacs-1bd539774234c7752daf9ee8cc39beb5916513b2.tar.gz |
(describe-variable): Remove hyperlinks in a
variable's value as these are quite frequently inappropriate.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r-- | lisp/help-fns.el | 7 |
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)) |