From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: martin rudalics Newsgroups: gmane.emacs.bugs Subject: bug#1319: Change in where-is-internal causing describe-key problems Date: Wed, 12 Nov 2008 19:32:26 +0100 Message-ID: <491B213A.3080001@gmx.at> References: <4919554E.9020600@gmx.at> <49197D47.4080406@gmx.at> Reply-To: martin rudalics , 1319@emacsbugs.donarmstrong.com NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1226515829 27177 80.91.229.12 (12 Nov 2008 18:50:29 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 12 Nov 2008 18:50:29 +0000 (UTC) Cc: 1319@emacsbugs.donarmstrong.com, Geoff Gole To: Stefan Monnier Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Wed Nov 12 19:51:31 2008 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1L0KoL-0006mg-4q for geb-bug-gnu-emacs@m.gmane.org; Wed, 12 Nov 2008 19:51:29 +0100 Original-Received: from localhost ([127.0.0.1]:44593 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1L0KnD-0003Th-78 for geb-bug-gnu-emacs@m.gmane.org; Wed, 12 Nov 2008 13:50:19 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1L0Kn9-0003Sd-7H for bug-gnu-emacs@gnu.org; Wed, 12 Nov 2008 13:50:15 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1L0Kn7-0003Q3-Ht for bug-gnu-emacs@gnu.org; Wed, 12 Nov 2008 13:50:14 -0500 Original-Received: from [199.232.76.173] (port=59332 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1L0Kn7-0003Pg-Dd for bug-gnu-emacs@gnu.org; Wed, 12 Nov 2008 13:50:13 -0500 Original-Received: from rzlab.ucr.edu ([138.23.92.77]:37621) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1L0Kn5-0005jI-4j for bug-gnu-emacs@gnu.org; Wed, 12 Nov 2008 13:50:11 -0500 Original-Received: from rzlab.ucr.edu (rzlab.ucr.edu [127.0.0.1]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id mACIo7Sq006139; Wed, 12 Nov 2008 10:50:07 -0800 Original-Received: (from debbugs@localhost) by rzlab.ucr.edu (8.13.8/8.13.8/Submit) id mACIe33U003302; Wed, 12 Nov 2008 10:40:04 -0800 X-Loop: don@donarmstrong.com Resent-From: martin rudalics Resent-To: bug-submit-list@donarmstrong.com Resent-CC: Emacs Bugs Resent-Date: Wed, 12 Nov 2008 18:40:03 +0000 Resent-Message-ID: Resent-Sender: don@donarmstrong.com X-Emacs-PR-Message: report 1319 X-Emacs-PR-Package: emacs X-Emacs-PR-Keywords: Original-Received: via spool by 1319-submit@emacsbugs.donarmstrong.com id=B1319.12265148491953 (code B ref 1319); Wed, 12 Nov 2008 18:40:03 +0000 Original-Received: (at 1319) by emacsbugs.donarmstrong.com; 12 Nov 2008 18:34:09 +0000 Original-Received: from mail.gmx.net (mail.gmx.net [213.165.64.20]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with SMTP id mACIY4Ac001947 for <1319@emacsbugs.donarmstrong.com>; Wed, 12 Nov 2008 10:34:06 -0800 Original-Received: (qmail invoked by alias); 12 Nov 2008 18:33:58 -0000 Original-Received: from 62-47-49-82.adsl.highway.telekom.at (EHLO [62.47.49.82]) [62.47.49.82] by mail.gmx.net (mp008) with SMTP; 12 Nov 2008 19:33:58 +0100 X-Authenticated: #14592706 X-Provags-ID: V01U2FsdGVkX18bdtxM7Q4bqrAp5uPubzvVgs3d4Iicr1ZyWhP60p 65BpPSVaaIercn User-Agent: Thunderbird 2.0.0.16 (Windows/20080708) In-Reply-To: X-Y-GMX-Trusted: 0 X-FuHaFi: 0.6 X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 3) Resent-Date: Wed, 12 Nov 2008 13:50:14 -0500 X-BeenThere: bug-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:22308 Archived-At: >>> 22.2 => ([491520] [458752] [442368] [425984] [409600]...) >>> CVS => ([(128 . 4194303)]) > > The 22.2 answer lists generic chars (these are chars that stand for > a whole charset). In Emacs-23, generic chars have been dropped in favor > of using char-ranges, represented a a cons cell (START . END). This would deserve a NEWS entry. Anyway, we can either replace (if (and (eq function 'self-insert-command) (eq (key-binding "a") 'self-insert-command) (eq (key-binding "b") 'self-insert-command) (eq (key-binding "c") 'self-insert-command)) (princ "It is bound to many ordinary text characters.\n") ... by something like (if (and (eq function 'self-insert-command) (catch 'plenty (let ((count 0)) (dolist (item (where-is-internal 'self-insert-command)) (when (vectorp item) (let ((range (elt item 0))) (when (consp range) (setq count (+ count (- (cdr range) (car range)))) (when (> count 100) (throw 'plenty count))))))))) (princ "It is bound to many ordinary text characters.\n") ... or drop that "It is bound to many ordinary text characters" stuff. martin, who'd drop it unless someone finds a better solution.