aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2010-12-15 09:33:11 +0800
committerChong Yidong2010-12-15 09:33:11 +0800
commitac8055b36488493543aa0ca63eda8f484fcc58d1 (patch)
tree7ffb7ff956f7d782da5bf7630f3ca4a67d4fcd64
parentc8cbbe27d3f1fa0a844c6977bca1d7fbd659577f (diff)
downloademacs-ac8055b36488493543aa0ca63eda8f484fcc58d1.tar.gz
emacs-ac8055b36488493543aa0ca63eda8f484fcc58d1.zip
Fix error in last commit.
-rw-r--r--lisp/emulation/edt-mapper.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/emulation/edt-mapper.el b/lisp/emulation/edt-mapper.el
index a3f0e18bb5e..ec2847fafe0 100644
--- a/lisp/emulation/edt-mapper.el
+++ b/lisp/emulation/edt-mapper.el
@@ -162,11 +162,12 @@
162 162
163(mapc 163(mapc
164 (lambda (function-key) 164 (lambda (function-key)
165 (if (not (lookup-key (current-global-map) function-key)) 165 (if (not (lookup-key (current-global-map) function-key))
166 (define-key (current-global-map) function-key 'forward-char))) 166 (define-key (current-global-map) function-key 'forward-char)))
167 '([kp-0] [kp-1] [kp-2] [kp-3] [kp-4] 167 '([kp-0] [kp-1] [kp-2] [kp-3] [kp-4]
168 [kp-5] [kp-6] [kp-7] [kp-8] [kp-9] 168 [kp-5] [kp-6] [kp-7] [kp-8] [kp-9]
169 [kp- 169 [kp-space]
170 [kp-tab]
170 [kp-enter] 171 [kp-enter]
171 [kp-multiply] 172 [kp-multiply]
172 [kp-add] 173 [kp-add]