RE: adding manual cross-ref links to *Help*

["Drew Adams" <drew.adams@oracle.com>]

[-- Attachment #1: Type: text/plain, Size: 223 bytes --]

> Thanks, I'll look into this.

BTW, to make this feature complete, you will also want to add the attached patch
of `help.el', for `describe-mode'.  It adds links to manuals for each of the
modes described (major & minor).

[-- Attachment #2: help-2011-06-14.patch --]
[-- Type: application/octet-stream, Size: 2045 bytes --]

diff -c -w help.el help-patched-2011-06-14.el
*** help.el	Tue Jun 14 11:07:36 2011
--- help-patched-2011-06-14.el	Tue Jun 14 11:09:18 2011
***************
*** 852,858 ****
  				     "no indicator"
  				   (format "indicator%s"
  					   indicator))))
! 		  (princ (documentation mode-function)))
  		(insert-button pretty-minor-mode
  			       'action (car help-button-cache)
  			       'follow-link t
--- 852,859 ----
                                       "no indicator"
                                     (format "indicator%s"
                                             indicator))))
!                   (princ (documentation mode-function))
!                   (Info-make-manuals-xref mode-function t)) ; Link to manuals.
                  (insert-button pretty-minor-mode
                                 'action (car help-button-cache)
                                 'follow-link t
***************
*** 880,890 ****
  		(re-search-backward "`\\([^`']+\\)'" nil t)
  		(help-xref-button 1 'help-function-def mode file-name)))))
  	(princ ":\n")
! 	(princ (documentation major-mode)))))
    ;; For the sake of IELM and maybe others
    nil)
  
- 
  (defun describe-minor-mode (minor-mode)
    "Display documentation of a minor mode given as MINOR-MODE.
  MINOR-MODE can be a minor mode symbol or a minor mode indicator string
--- 881,893 ----
                  (re-search-backward "`\\([^`']+\\)'" nil t)
                  (help-xref-button 1 'help-function-def mode file-name)))))
          (princ ":\n")
!         (princ (documentation major-mode))
!         (let ((maj  major-mode))
!           (with-current-buffer standard-output
!             (Info-make-manuals-xref maj t)))))) ; Link to manuals.
    ;; For the sake of IELM and maybe others
    nil)
  
  (defun describe-minor-mode (minor-mode)
    "Display documentation of a minor mode given as MINOR-MODE.
  MINOR-MODE can be a minor mode symbol or a minor mode indicator string

Diff finished.  Tue Jun 14 11:10:14 2011