From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.bugs Subject: bug#10771: TAB completion for info-display-manual Date: Thu, 09 Feb 2012 11:28:18 +0200 Organization: JURTA Message-ID: <87haz0gxuf.fsf@mail.jurta.org> References: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1328779935 664 80.91.229.3 (9 Feb 2012 09:32:15 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 9 Feb 2012 09:32:15 +0000 (UTC) Cc: 10771@debbugs.gnu.org To: Glenn Morris Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Thu Feb 09 10:32:13 2012 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RvQMN-0001Fm-Ox for geb-bug-gnu-emacs@m.gmane.org; Thu, 09 Feb 2012 10:32:11 +0100 Original-Received: from localhost ([::1]:50140 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RvQMN-0005dv-CO for geb-bug-gnu-emacs@m.gmane.org; Thu, 09 Feb 2012 04:32:11 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:37561) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RvQMG-0005Yx-6l for bug-gnu-emacs@gnu.org; Thu, 09 Feb 2012 04:32:08 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RvQM8-0001GT-3J for bug-gnu-emacs@gnu.org; Thu, 09 Feb 2012 04:32:04 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:57850) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RvQM8-0001GO-0k for bug-gnu-emacs@gnu.org; Thu, 09 Feb 2012 04:31:56 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.72) (envelope-from ) id 1RvQNC-0000Ba-4v for bug-gnu-emacs@gnu.org; Thu, 09 Feb 2012 04:33:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Juri Linkov Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 09 Feb 2012 09:33:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 10771 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 10771-submit@debbugs.gnu.org id=B10771.1328779928637 (code B ref 10771); Thu, 09 Feb 2012 09:33:02 +0000 Original-Received: (at 10771) by debbugs.gnu.org; 9 Feb 2012 09:32:08 +0000 Original-Received: from localhost ([127.0.0.1]:33237 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1RvQMK-0000AD-BE for submit@debbugs.gnu.org; Thu, 09 Feb 2012 04:32:08 -0500 Original-Received: from ps18281.dreamhost.com ([69.163.218.105]:55040 helo=ps18281.dreamhostps.com) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1RvQMG-00009J-TT; Thu, 09 Feb 2012 04:32:06 -0500 Original-Received: from localhost (ps18281.dreamhostps.com [69.163.218.105]) by ps18281.dreamhostps.com (Postfix) with ESMTP id D1116451C84A; Thu, 9 Feb 2012 01:29:32 -0800 (PST) In-Reply-To: (Glenn Morris's message of "Thu, 09 Feb 2012 01:36:37 -0500") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.93 (x86_64-pc-linux-gnu) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:56715 Archived-At: tags 10771 patch thanks > M-x info-display-manual RET em TAB > > I hoped this would offer completion over the manuals in my INFOPATH, but > it just inserts a literal tab. This patch offers completion: === modified file 'lisp/info.el' --- lisp/info.el 2012-01-25 17:54:01 +0000 +++ lisp/info.el 2012-02-09 09:27:10 +0000 @@ -4984,7 +4984,13 @@ (defun Info-bookmark-jump (bmk) ;;;###autoload (defun info-display-manual (manual) "Go to Info buffer that displays MANUAL, creating it if none already exists." - (interactive "sManual name: ") + (interactive + (list + (completing-read "Manual name: " + (apply-partially 'Info-read-node-name-2 + Info-directory-list + (mapcar 'car Info-suffix-list)) + nil t))) (let ((blist (buffer-list)) (manual-re (concat "\\(/\\|\\`\\)" manual "\\(\\.\\|\\'\\)")) (case-fold-search t)