# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 738657530 0
# Node ID 6283e50471eb34e50bc5ee87c482d11eb1f5afcb
# Parent  9691f6951ee4608421a4d3ce5b98e4f3ed25f1d2
Initial revision

diff -r 9691f6951ee4 -r 6283e50471eb lisp/term/lk201.el
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/term/lk201.el	Sat May 29 06:38:50 1993 +0000
@@ -0,0 +1,21 @@
+(define-key function-key-map "\e[17~" [f6])
+(define-key function-key-map "\e[18~" [f7])
+(define-key function-key-map "\e[19~" [f8])
+(define-key function-key-map "\e[20~" [f9])
+(define-key function-key-map "\e[21~" [f10])
+(define-key function-key-map "\e[23~" [f11])
+(define-key function-key-map "\e[24~" [f12])
+(define-key function-key-map "\e[25~" [f13])
+(define-key function-key-map "\e[26~" [f14])
+(define-key function-key-map "\e[28~" [help])
+(define-key function-key-map "\e[29~" [do])
+(define-key function-key-map "\e[1~" [find])
+(define-key function-key-map "\e[2~" [insert])
+(define-key function-key-map "\e[3~" [remove])
+(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[31~" [f17])
+(define-key function-key-map "\e[32~" [f18])
+(define-key function-key-map "\e[33~" [f19])
+(define-key function-key-map "\e[34~" [f20])