From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.devel Subject: Re: describe-bindings: ^L, bad order, naming Date: Sat, 12 Nov 2005 23:19:44 +0200 Organization: JURTA Message-ID: <87ek5lehq3.fsf@jurta.org> References: <89DEE8B2-EA6A-4347-A9AB-D1B99C58E725@gmail.com> <87ek5nqepv.fsf@jurta.org> <0985E44C-0765-4503-A1BC-964B15DF8003@gmail.com> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1131831073 11287 80.91.229.2 (12 Nov 2005 21:31:13 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 12 Nov 2005 21:31:13 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sat Nov 12 22:31:12 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Eb2w8-00086B-8u for ged-emacs-devel@m.gmane.org; Sat, 12 Nov 2005 22:29:24 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Eb2w7-0005Vp-LI for ged-emacs-devel@m.gmane.org; Sat, 12 Nov 2005 16:29:23 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Eb2vZ-0005Lq-I3 for emacs-devel@gnu.org; Sat, 12 Nov 2005 16:28:49 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Eb2vY-0005LK-3Y for emacs-devel@gnu.org; Sat, 12 Nov 2005 16:28:49 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Eb2vY-0005LH-07 for emacs-devel@gnu.org; Sat, 12 Nov 2005 16:28:48 -0500 Original-Received: from [194.126.101.111] (helo=mail.neti.ee) by monty-python.gnu.org with esmtp (Exim 4.34) id 1Eb2vX-0003Vw-U6 for emacs-devel@gnu.org; Sat, 12 Nov 2005 16:28:48 -0500 Original-Received: from mail.neti.ee (80-235-43-37-dsl.mus.estpak.ee [80.235.43.37]) by Relayhost1.neti.ee (Postfix) with ESMTP id 59A1F1BC2; Sat, 12 Nov 2005 23:29:01 +0200 (EET) Original-To: David Reitter In-Reply-To: <0985E44C-0765-4503-A1BC-964B15DF8003@gmail.com> (David Reitter's message of "Fri, 11 Nov 2005 21:01:09 +0000") User-Agent: Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (gnu/linux) X-Virus-Scanned: by amavisd-new-2.2.1 (20041222) (Debian) at neti.ee X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:45846 Archived-At: >> I use (aset standard-display-table ?\f (vconcat (make-vector 64 ?-) "^L")) >> to display the page delimiter as a horizontal line, and this is >> very helpful not only in the *Help* buffer, but in other places >> too, including source code buffers. > > This would have global implications, right? > The idea with an overlay could easily work locally, and it's prettier > as well. Yes, this affect everything. Instead of that, in the Help buffer overlays or text properties could be used locally. >>> Couldn't there be a list of all groups in the beginning, with links >>> going to the bindings belonging to the group? >> >> Like in the *Help* buffer created by `C-h m'? > > Yup. That would be fine. > Outline mode, as suggested by Eli, is OK only if it doesn't require > people to know some keys in order to even look up the keys. By default, Outline mode is harmless and doesn't require to know its keys to read the Help buffer. Advanced users should know Outline keys to use it and to hide/show uninteresting parts. So it doesn't harm to set outline-regexp and enable outline-minor-mode on the Help buffer. I imagine that code like below could be used to enable Outline minor mode and to add a horizontal line to page breaks: (defadvice describe-bindings (after my-describe-bindings activate) (with-current-buffer "*Help*" (save-excursion (let ((inhibit-read-only t)) (goto-char (point-min)) (while (re-search-forward "^\^L$" nil t) (put-text-property (match-beginning 0) (match-end 0) 'display (concat (make-string 64 ?-) "^L"))))) (set (make-local-variable 'outline-regexp) "^.*:$") (outline-minor-mode 1))) -- Juri Linkov http://www.jurta.org/emacs/