[Emacs-diffs] trunk r115457: * lisp/simple.el (normal-erase-is-backspace-mode): Map kp-delete identically

[Stefan Monnier]

------------------------------------------------------------
revno: 115457
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=16109
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Wed 2013-12-11 09:22:26 -0500
message:
  * lisp/simple.el (normal-erase-is-backspace-mode): Map kp-delete identically
  to `delete'.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/simple.el                 simple.el-20091113204419-o5vbwnq5f7feedwu-403

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-12-11 13:50:46 +0000
+++ b/lisp/ChangeLog    2013-12-11 14:22:26 +0000
@@ -1,3 +1,8 @@
+2013-12-11  Stefan Monnier  <address@hidden>
+
+       * simple.el (normal-erase-is-backspace-mode): Map kp-delete identically
+       to `delete' (bug#16109).
+
 2013-12-11  Rüdiger Sonderfeld  <address@hidden>
 
        * progmodes/octave.el (octave-mode, inferior-octave-mode): Link to

=== modified file 'lisp/simple.el'
--- a/lisp/simple.el    2013-12-03 01:19:24 +0000
+++ b/lisp/simple.el    2013-12-11 14:22:26 +0000
@@ -7435,7 +7435,7 @@
             (if enabled
                 (progn
                   (define-key local-function-key-map [delete] [deletechar])
-                  (define-key local-function-key-map [kp-delete] [?\C-d])
+                  (define-key local-function-key-map [kp-delete] [deletechar])
                   (define-key local-function-key-map [backspace] [?\C-?])
                    (dolist (b bindings)
                      ;; Not sure if input-decode-map is really right, but