From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Drew Adams" Newsgroups: gmane.emacs.devel Subject: RE: adding manual cross-ref links to *Help* Date: Tue, 14 Jun 2011 11:11:49 -0700 Message-ID: <75746CA9510E4927940436FA1F4E066A@us.oracle.com> References: <9CE56B14F4964F7A8D872D3553176C61@us.oracle.com><8762octf66.fsf@mail.jurta.org><6D7CA6598EAD4E3DB7B2E5D992BBDFF4@us.oracle.com> <87mxhk1fuq.fsf@mail.jurta.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="----=_NextPart_000_0089_01CC2A83.DBD5DC50" X-Trace: dough.gmane.org 1308075741 20353 80.91.229.12 (14 Jun 2011 18:22:21 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Tue, 14 Jun 2011 18:22:21 +0000 (UTC) Cc: emacs-devel@gnu.org To: "'Juri Linkov'" Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Tue Jun 14 20:22:16 2011 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1QWYFj-0000v2-Hx for ged-emacs-devel@m.gmane.org; Tue, 14 Jun 2011 20:22:15 +0200 Original-Received: from localhost ([::1]:50921 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QWYFi-0006o5-BM for ged-emacs-devel@m.gmane.org; Tue, 14 Jun 2011 14:22:14 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:38034) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QWY5s-0004Kg-8J for emacs-devel@gnu.org; Tue, 14 Jun 2011 14:12:05 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QWY5q-0004kM-GG for emacs-devel@gnu.org; Tue, 14 Jun 2011 14:12:03 -0400 Original-Received: from rcsinet10.oracle.com ([148.87.113.121]:28430) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QWY5q-0004kG-0o for emacs-devel@gnu.org; Tue, 14 Jun 2011 14:12:02 -0400 Original-Received: from rtcsinet22.oracle.com (rtcsinet22.oracle.com [66.248.204.30]) by rcsinet10.oracle.com (Switch-3.4.2/Switch-3.4.2) with ESMTP id p5EIBwpk008590 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=OK); Tue, 14 Jun 2011 18:12:00 GMT Original-Received: from acsmt356.oracle.com (acsmt356.oracle.com [141.146.40.156]) by rtcsinet22.oracle.com (8.14.4+Sun/8.14.4) with ESMTP id p5EIBvMN018149 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NO); Tue, 14 Jun 2011 18:11:57 GMT Original-Received: from abhmt006.oracle.com (abhmt006.oracle.com [141.146.116.15]) by acsmt356.oracle.com (8.12.11.20060308/8.12.11) with ESMTP id p5EIBpBl023223; Tue, 14 Jun 2011 13:11:51 -0500 Original-Received: from dradamslap1 (/10.159.53.1) by default (Oracle Beehive Gateway v4.0) with ESMTP ; Tue, 14 Jun 2011 11:11:51 -0700 X-Mailer: Microsoft Office Outlook 11 In-Reply-To: <87mxhk1fuq.fsf@mail.jurta.org> Thread-Index: AcwqueQISNvKN/NZS7u81gJd34osGgAA3gGg X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.6090 X-Source-IP: rtcsinet22.oracle.com [66.248.204.30] X-CT-RefId: str=0001.0A090208.4DF7A470.00A6:SCFSTAT5015188,ss=1,fgs=0 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-Received-From: 148.87.113.121 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:140465 Archived-At: This is a multi-part message in MIME format. ------=_NextPart_000_0089_01CC2A83.DBD5DC50 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit > 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). ------=_NextPart_000_0089_01CC2A83.DBD5DC50 Content-Type: application/octet-stream; name="help-2011-06-14.patch" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="help-2011-06-14.patch" diff -c -w help.el help-patched-2011-06-14.el=0A= *** help.el Tue Jun 14 11:07:36 2011=0A= --- help-patched-2011-06-14.el Tue Jun 14 11:09:18 2011=0A= ***************=0A= *** 852,858 ****=0A= "no indicator"=0A= (format "indicator%s"=0A= indicator))))=0A= ! (princ (documentation mode-function)))=0A= (insert-button pretty-minor-mode=0A= 'action (car help-button-cache)=0A= 'follow-link t=0A= --- 852,859 ----=0A= "no indicator"=0A= (format "indicator%s"=0A= indicator))))=0A= ! (princ (documentation mode-function))=0A= ! (Info-make-manuals-xref mode-function t)) ; Link to = manuals.=0A= (insert-button pretty-minor-mode=0A= 'action (car help-button-cache)=0A= 'follow-link t=0A= ***************=0A= *** 880,890 ****=0A= (re-search-backward "`\\([^`']+\\)'" nil t)=0A= (help-xref-button 1 'help-function-def mode file-name)))))=0A= (princ ":\n")=0A= ! (princ (documentation major-mode)))))=0A= ;; For the sake of IELM and maybe others=0A= nil)=0A= =0A= - =0A= (defun describe-minor-mode (minor-mode)=0A= "Display documentation of a minor mode given as MINOR-MODE.=0A= MINOR-MODE can be a minor mode symbol or a minor mode indicator string=0A= --- 881,893 ----=0A= (re-search-backward "`\\([^`']+\\)'" nil t)=0A= (help-xref-button 1 'help-function-def mode = file-name)))))=0A= (princ ":\n")=0A= ! (princ (documentation major-mode))=0A= ! (let ((maj major-mode))=0A= ! (with-current-buffer standard-output=0A= ! (Info-make-manuals-xref maj t)))))) ; Link to manuals.=0A= ;; For the sake of IELM and maybe others=0A= nil)=0A= =0A= (defun describe-minor-mode (minor-mode)=0A= "Display documentation of a minor mode given as MINOR-MODE.=0A= MINOR-MODE can be a minor mode symbol or a minor mode indicator string=0A= =0A= Diff finished. Tue Jun 14 11:10:14 2011=0A= ------=_NextPart_000_0089_01CC2A83.DBD5DC50--