changeset 5577:a0e0f051e3d2

entered into RCS
author Richard M. Stallman <rms@gnu.org>
date Fri, 14 Jan 1994 14:08:11 +0000
parents 1449eaee85a9
children b785c3474b47
files lisp/term/lk201.el
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term/lk201.el	Thu Jan 13 10:42:24 1994 +0000
+++ b/lisp/term/lk201.el	Fri Jan 14 14:08:11 1994 +0000
@@ -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])