From ac8055b36488493543aa0ca63eda8f484fcc58d1 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 15 Dec 2010 09:33:11 +0800 Subject: [PATCH] Fix error in last commit. --- lisp/emulation/edt-mapper.el | 7 ++++--- 1 file 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 @@ (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] -- 2.39.2