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: where-is-internal question Date: Tue, 6 Sep 2005 20:19:58 -0700 Message-ID: References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1126063376 26254 80.91.229.2 (7 Sep 2005 03:22:56 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 7 Sep 2005 03:22:56 +0000 (UTC) Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Sep 07 05:22:46 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1ECqW3-0005bG-7E for ged-emacs-devel@m.gmane.org; Wed, 07 Sep 2005 05:22:27 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1ECqaZ-00061X-Iy for ged-emacs-devel@m.gmane.org; Tue, 06 Sep 2005 23:27:07 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1ECqYi-0005Vb-Nb for emacs-devel@gnu.org; Tue, 06 Sep 2005 23:25:12 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1ECqYg-0005VA-M6 for emacs-devel@gnu.org; Tue, 06 Sep 2005 23:25:12 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1ECqYg-0005V6-DS for emacs-devel@gnu.org; Tue, 06 Sep 2005 23:25:10 -0400 Original-Received: from [141.146.126.230] (helo=agminet03.oracle.com) by monty-python.gnu.org with esmtp (TLS-1.0:DHE_RSA_3DES_EDE_CBC_SHA:24) (Exim 4.34) id 1ECqXr-0003pL-Cy for emacs-devel@gnu.org; Tue, 06 Sep 2005 23:24:19 -0400 Original-Received: from rgmsgw300.us.oracle.com (rgmsgw300.us.oracle.com [138.1.186.49]) by agminet03.oracle.com (Switch-3.1.7/Switch-3.1.7) with ESMTP id j873K3jn018748 for ; Tue, 6 Sep 2005 22:20:03 -0500 Original-Received: from rgmsgw300.us.oracle.com (localhost [127.0.0.1]) by rgmsgw300.us.oracle.com (Switch-3.1.7/Switch-3.1.7) with ESMTP id j873K2n9005447 for ; Tue, 6 Sep 2005 21:20:02 -0600 Original-Received: from dradamslap (dhcp-amer-whq-csvpn-gw3-141-144-81-65.vpn.oracle.com [141.144.81.65]) by rgmsgw300.us.oracle.com (Switch-3.1.7/Switch-3.1.7) with SMTP id j873K1e2005439 (version=TLSv1/SSLv3 cipher=RC4-MD5 bits=128 verify=NO) for ; Tue, 6 Sep 2005 21:20:02 -0600 Original-To: "Emacs-Devel" X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook IMO, Build 9.0.6604 (9.0.2911.0) In-Reply-To: X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1506 Importance: Normal X-Brightmail-Tracker: AAAAAQAAAAI= X-Whitelist: TRUE 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:42685 Archived-At: In previous Emacs versions, I could do this, to bind stuff that is bound to self-insert-command in the global map: (dolist (key (where-is-internal 'self-insert-command global-map)) (define-key my-map key 'my-command)) Now, however, it looks like I need to do something like the following. (dolist (key (or (condition-case nil (where-is-internal 'self-insert-command global-map nil nil t) (wrong-number-of-arguments nil)) (where-is-internal 'self-insert-command global-map))) (define-key my-map key 'my-command)) I forgot to mention that, whereas the above code is lightning-quick in Emacs 20 (without the 5th arg), in Emacs 22 it takes about 5 _seconds_ (on a pretty fast machine). Why so slow?