Index: emacs/lisp/help-fns.el
diff -c emacs/lisp/help-fns.el:1.66 emacs/lisp/help-fns.el:1.67
*** emacs/lisp/help-fns.el:1.66 Wed Mar 30 22:50:17 2005
--- emacs/lisp/help-fns.el Thu May 19 00:13:09 2005
***************
*** 535,541 ****
(terpri)
(let ((from (point)))
(pp val)
! (help-xref-on-pp from (point))
(if (< (point) (+ from 20))
(delete-region (1- from) from)))))
(terpri)
--- 535,543 ----
(terpri)
(let ((from (point)))
(pp val)
! ;; 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,562 ****
;; sensible size before prettyprinting. -- fx
(let ((from (point)))
(pp val)
! (help-xref-on-pp from (point))
(if (< (point) (+ from 20))
(delete-region (1- from) from))))))
(terpri))
--- 558,565 ----
;; sensible size before prettyprinting. -- fx
(let ((from (point)))
(pp val)
! ;; See previous comment for this function.
! ;; (help-xref-on-pp from (point))
(if (< (point) (+ from 20))
(delete-region (1- from) from))))))
(terpri))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
