From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Kevin Rodgers Newsgroups: gmane.emacs.devel Subject: Re: [drew.adams@oracle.com: links in Help buffer aren't alwayscorrect] Date: Wed, 14 Dec 2005 11:10:05 -0700 Message-ID: References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1134596826 18613 80.91.229.2 (14 Dec 2005 21:47:06 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 14 Dec 2005 21:47:06 +0000 (UTC) Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Dec 14 22:46:58 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1EmeQJ-0001P7-GP for ged-emacs-devel@m.gmane.org; Wed, 14 Dec 2005 22:44:31 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1EmeQv-0005mx-9k for ged-emacs-devel@m.gmane.org; Wed, 14 Dec 2005 16:45:09 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1EmbAG-0008Rt-Ha for emacs-devel@gnu.org; Wed, 14 Dec 2005 13:15:45 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1EmbAB-0008Po-VW for emacs-devel@gnu.org; Wed, 14 Dec 2005 13:15:43 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1EmbAA-0008P5-Hx for emacs-devel@gnu.org; Wed, 14 Dec 2005 13:15:39 -0500 Original-Received: from [80.91.229.2] (helo=ciao.gmane.org) by monty-python.gnu.org with esmtp (TLS-1.0:RSA_AES_128_CBC_SHA:16) (Exim 4.34) id 1EmbCH-0005yt-1Y for emacs-devel@gnu.org; Wed, 14 Dec 2005 13:17:49 -0500 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1Emb6u-0004X8-5T for emacs-devel@gnu.org; Wed, 14 Dec 2005 19:12:16 +0100 Original-Received: from 207.167.42.60 ([207.167.42.60]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 14 Dec 2005 19:12:16 +0100 Original-Received: from ihs_4664 by 207.167.42.60 with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 14 Dec 2005 19:12:16 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-To: emacs-devel@gnu.org Original-Lines: 28 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: 207.167.42.60 User-Agent: Mozilla Thunderbird 0.9 (X11/20041105) X-Accept-Language: en-us, en In-Reply-To: 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:47718 Archived-At: Kevin Rodgers wrote: > (completing-read (if (assq default-param param-alist) > (format "Describe parameter (default %s): " > default-param) > "Describe parameter: ") > obarray > (lambda (p) (assq p param-alist)) > t nil nil > (if default-param (symbol-name default-param))))) It probably makes more sense to complete on the frame parameter alist (with no predicate) than the entire obarray (with a predicate to check the alist): (completing-read (if (assq default-param param-alist) (format "Describe parameter (default %s): " default-param) "Describe parameter: ") (mapcar (lambda (assoc) (list (symbol-name (car assoc)))) param-alist) nil t nil nil (if default-param (symbol-name default-param))) -- Kevin Rodgers