# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1292376791 -28800
# Node ID 44c22a3327ece9494cfe1cd10fed3924b3829f1c
# Parent  4a7382958ef10b2c083af9c9493ded26d4d1d941
Fix error in last commit.

diff -r 4a7382958ef1 -r 44c22a3327ec lisp/emulation/edt-mapper.el
--- a/lisp/emulation/edt-mapper.el	Wed Dec 15 09:26:56 2010 +0800
+++ b/lisp/emulation/edt-mapper.el	Wed Dec 15 09:33:11 2010 +0800
@@ -162,11 +162,12 @@
 
 (mapc
  (lambda (function-key)
-      (if (not (lookup-key (current-global-map) function-key))
-               (define-key (current-global-map) function-key 'forward-char)))
+   (if (not (lookup-key (current-global-map) function-key))
+       (define-key (current-global-map) function-key 'forward-char)))
  '([kp-0] [kp-1] [kp-2] [kp-3] [kp-4]
    [kp-5] [kp-6] [kp-7] [kp-8] [kp-9]
-   [kp-
+   [kp-space]
+   [kp-tab]
    [kp-enter]
    [kp-multiply]
    [kp-add]