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#17759: 24.4.50; Missing 'ascii-character props Date: Fri, 13 Jun 2014 09:30:13 +0300 Organization: JURTA Message-ID: <87mwdhe2yw.fsf@mail.jurta.org> References: <21401.33221.770115.718905@home.barzilay.org> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1402641208 19409 80.91.229.3 (13 Jun 2014 06:33:28 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 13 Jun 2014 06:33:28 +0000 (UTC) Cc: 17759@debbugs.gnu.org To: Eli Barzilay Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Fri Jun 13 08:33:20 2014 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1WvL3A-0007M1-9k for geb-bug-gnu-emacs@m.gmane.org; Fri, 13 Jun 2014 08:33:20 +0200 Original-Received: from localhost ([::1]:56987 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WvL39-0000KS-TX for geb-bug-gnu-emacs@m.gmane.org; Fri, 13 Jun 2014 02:33:19 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:41666) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WvL31-0000EN-Jv for bug-gnu-emacs@gnu.org; Fri, 13 Jun 2014 02:33:17 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1WvL2s-0005en-PV for bug-gnu-emacs@gnu.org; Fri, 13 Jun 2014 02:33:11 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:54961) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WvL2s-0005ef-Mt for bug-gnu-emacs@gnu.org; Fri, 13 Jun 2014 02:33:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1WvL2s-0003RM-4s for bug-gnu-emacs@gnu.org; Fri, 13 Jun 2014 02:33:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Juri Linkov Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Fri, 13 Jun 2014 06:33:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 17759 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 17759-submit@debbugs.gnu.org id=B17759.140264113413131 (code B ref 17759); Fri, 13 Jun 2014 06:33:02 +0000 Original-Received: (at 17759) by debbugs.gnu.org; 13 Jun 2014 06:32:14 +0000 Original-Received: from localhost ([127.0.0.1]:46111 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WvL25-0003Pg-Kj for submit@debbugs.gnu.org; Fri, 13 Jun 2014 02:32:14 -0400 Original-Received: from alc-vshost7.dreamhost.com ([69.163.216.107]:53743 helo=ps18281.dreamhostps.com) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WvL22-0003PT-PJ for 17759@debbugs.gnu.org; Fri, 13 Jun 2014 02:32:11 -0400 Original-Received: from localhost.jurta.org (ps18281.dreamhostps.com [69.163.222.226]) by ps18281.dreamhostps.com (Postfix) with ESMTP id AFE64320E8AC48; Thu, 12 Jun 2014 23:32:08 -0700 (PDT) In-Reply-To: <21401.33221.770115.718905@home.barzilay.org> (Eli Barzilay's message of "Thu, 12 Jun 2014 06:32:37 -0400") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (x86_64-pc-linux-gnu) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x 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:90308 Archived-At: > In the current development version this: > > (get 'kp-7 'ascii-character) > > no longer works. It seems to have been removed in what git shows as > revision 7f3c6d9a: > > Author: Juri Linkov > Date: 2013-12-13 03:03:04 +0200 > > * lisp/simple.el : Remove key bindings duplicated > with bindings.el. > > Perhaps the intention is to use only key definitions as the mappings, > but there is surely code that broke with the change. (At least > "calculator.el" did, but I'll fix it if it was intentional.) Thanks for noticing. This should be fixed by this patch: === modified file 'lisp/bindings.el' --- lisp/bindings.el 2014-03-20 17:14:45 +0000 +++ lisp/bindings.el 2014-06-13 06:30:04 +0000 @@ -1076,9 +1076,13 @@ (let ((modifiers '(nil (control) (meta) (kp-add ?+) (kp-subtract ?-) (kp-multiply ?*) (kp-divide ?/)))) (dolist (pair keys) (dolist (mod modifiers) - (define-key function-key-map - (vector (append mod (list (nth 0 pair)))) - (vector (append mod (list (nth 1 pair)))))))) + (let ((keypad (nth 0 pair)) + (normal (nth 1 pair))) + (when (and (characterp normal) (eq (char-charset normal) 'ascii)) + (put keypad 'ascii-character normal)) + (define-key function-key-map + (vector (append mod (list keypad))) + (vector (append mod (list normal)))))))) (define-key function-key-map [backspace] [?\C-?]) (define-key function-key-map [delete] [?\C-?])