From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Stephen J. Turnbull" Newsgroups: gmane.emacs.devel Subject: Re: face-remapping patch Date: Fri, 30 May 2008 13:48:57 +0900 Message-ID: <87abi8flc6.fsf@uwakimon.sk.tsukuba.ac.jp> References: <5CB5F5E5-9239-40A8-A3B2-5F49B94E27B7@gmail.com> <85lk1ui3i0.fsf@lola.goethe.zz> <85ej7mi30t.fsf@lola.goethe.zz> <871w3lkmec.fsf@uwakimon.sk.tsukuba.ac.jp> <85iqwwg3j8.fsf@lola.goethe.zz> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1212122241 13148 80.91.229.12 (30 May 2008 04:37:21 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 30 May 2008 04:37:21 +0000 (UTC) Cc: David Reitter , Emacs-Devel , Stefan Monnier , Miles Bader To: David Kastrup Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri May 30 06:37:58 2008 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1K1wNI-0002z4-Uc for ged-emacs-devel@m.gmane.org; Fri, 30 May 2008 06:37:57 +0200 Original-Received: from localhost ([127.0.0.1]:34120 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1K1wMX-0001V5-9V for ged-emacs-devel@m.gmane.org; Fri, 30 May 2008 00:37:09 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1K1wMS-0001V0-Eh for emacs-devel@gnu.org; Fri, 30 May 2008 00:37:04 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1K1wMR-0001Uc-Re for emacs-devel@gnu.org; Fri, 30 May 2008 00:37:04 -0400 Original-Received: from [199.232.76.173] (port=42283 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1K1wMR-0001UX-LM for emacs-devel@gnu.org; Fri, 30 May 2008 00:37:03 -0400 Original-Received: from mtps01.sk.tsukuba.ac.jp ([130.158.97.223]:36793) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1K1wMG-00011u-Gi; Fri, 30 May 2008 00:36:52 -0400 Original-Received: from uwakimon.sk.tsukuba.ac.jp (uwakimon.sk.tsukuba.ac.jp [130.158.99.156]) by mtps01.sk.tsukuba.ac.jp (Postfix) with ESMTP id A964A1535A8; Fri, 30 May 2008 13:36:50 +0900 (JST) Original-Received: by uwakimon.sk.tsukuba.ac.jp (Postfix, from userid 1000) id 727E21A25C3; Fri, 30 May 2008 13:48:57 +0900 (JST) In-Reply-To: <85iqwwg3j8.fsf@lola.goethe.zz> X-Mailer: VM ?bug? under XEmacs 21.5.21 (x86_64-unknown-linux) X-detected-kernel: by monty-python.gnu.org: Linux 2.6, seldom 2.4 (older, 4) 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:98040 Archived-At: David Kastrup writes: > ;;; [Courtesy Stephen J. Turnbull, with some modifications > ;;; Message-ID: <87el9fglsj.fsf@tleepslib.sk.tsukuba.ac.jp> > ;;; I could not have figured this out for the world] > ;;; Hm, there really ought to be a way to get the spec that would be > ;;; instantiated in a given domain > (when preview-tb-icon > (let ((tb (cdadar (or (specifier-spec-list default-toolbar (current-buffer)) > (specifier-spec-list default-toolbar 'global))))) Very likely this can be simplified to (when preview-tb-icon (let ((tb (specifier-instance default-toolbar))) I told you how to do what you said you wanted to do. This is probably good enough for practical purposes, and not the kind of thing that would frighten small children.