entered into RCS

diff --git a/lisp/term/lk201.el b/lisp/term/lk201.el
index c35e794f9b78286a018da744bdcef5b94bdda2be..024a8e1c3177a19f0f84eada9e12f97362ecc2e5 100644 (file)
--- a/lisp/term/lk201.el
+++ b/lisp/term/lk201.el
@@ -12,6 +12,11 @@
 (define-key function-key-map "\e[4~" [select])
 (define-key function-key-map "\e[5~" [prior])
 (define-key function-key-map "\e[6~" [next])
+(define-key function-key-map "\e[11~" [f1])
+(define-key function-key-map "\e[12~" [f2])
+(define-key function-key-map "\e[13~" [f3])
+(define-key function-key-map "\e[14~" [f4])
+(define-key function-key-map "\e[15~" [f5])
 (define-key function-key-map "\e[17~" [f6])
 (define-key function-key-map "\e[18~" [f7])
 (define-key function-key-map "\e[19~" [f8])
@@ -45,7 +50,7 @@
 (define-key function-key-map "\eOM" [kp-enter])
 (define-key function-key-map "\eOl" [kp-separator])
 (define-key function-key-map "\eOm" [kp-subtract])
-(define-key function-key-map "\eOn" [kp-period])
+(define-key function-key-map "\eOn" [kp-decimal])
 (define-key function-key-map "\eOp" [kp-0])
 (define-key function-key-map "\eOq" [kp-1])
 (define-key function-key-map "\eOr" [kp-2])