keys: move key definitions into translation includes

[sheet.git] / screen.eng.inc.pl

diff --git a/screen.eng.inc.pl b/screen.eng.inc.pl
index e13cb1b17b39567b81ef9b818ac54e9bf6290d0d..7198b250014f67165a652c4101bbccac48b8530d 100644 (file)
--- a/screen.eng.inc.pl
+++ b/screen.eng.inc.pl
@@ -1,6 +1,8 @@
 use utf8;
 
 {
+# screen version 4.00.03jw4
+
 key => {
        'a' => "literal a",
        'A' => "title", # title
@@ -78,5 +80,87 @@ flag => {
        arg => ["key<arg>" => "Commands with a dot need a char argument afterwards."],
 },
 
-def => do 'screen.inc.pl',
+def => {
+       '' => {
+               'a' => 'g7',
+               'A' => 'g9 args', # title
+               '^a'=> 'g3',
+               'b' => 'g7', # break
+               'B' => 'g7', # pow_break
+               '^b'=> '=b',
+               'c' => 'g9', # screen
+               'C' => 'g2', # clear
+               '^c'=> '=c',
+               'd' => 'g9', # detach
+               'D' => 'g9', # pow_detach
+               '^d'=> '=d',
+               'f' => 'g4', # flow
+               'F' => 'g4',
+               '^f'=> '=f',
+               '^g'=> 'g4', # vbell
+               'h' => 'g6', # hardcopy
+               'H' => 'g5', # log
+               '^h'=> '=^p',
+               'i' => 'g1', # info
+               'I' => 'g5', #XXX
+               '^i'=> 'g2', # focus
+               'k' => 'g5', # kill
+               'K' => '=k',
+               'l' => 'g2', # redisplay
+               'L' => 'g5', # login
+               '^l'=> '=l',
+               'm' => 'g1', # lastmsg
+               'M' => 'g5', # monitor
+               '^m'=> '=m',
+               'n' => 'g3', # next
+               'N' => 'g1', # number
+               '^n'=> '=n',
+               'O' => 'g5', #XXX
+               '^o'=> 'g3', # other
+               'p' => 'g3', # prev
+               '^p'=> '=p',
+               'q' => 'g4', # xon
+               'Q' => 'g2', # only
+               '^q'=> '=q',
+               'r' => 'g4', # wrap
+               '^r'=> '=r',
+               's' => 'g4', # xoff
+               '^s'=> '=s',
+               't' => 'g1', # time
+               '^t'=> '=t',
+               'v' => 'g1',
+               '^v'=> 'g7 arg arg linkdigraphs', # digraph
+               'w' => 'g1', # windows
+               'W' => 'g4', # width
+               '^w'=> '=w',
+               'x' => 'g9', # lockscreen
+               'X' => 'g2', # remove
+               '^x'=> '=x',
+               'z' => 'g9', # suspend
+               'Z' => 'g9',
+               '^z'=> '=z',
+
+               "'" => 'g3 arg', # select
+               '"' => 'g3', # windowlist -b
+               ':' => 'g4', # colon
+               "\e"=> 'g6', # copy
+               '[' => '=^[',
+               '^['=> "=\e",
+               '^]'=> 'g7', # paste .
+               ']' => '=^]',
+               '|' => 'g2', # split -v
+               '{' => 'g7', # history
+               '}' => 'g7', # history
+               '=' => 'g6', # removebuf
+               '^?'=> '=^h',
+               '*' => 'g1', # displays
+               '.' => 'g9', # dumptermcap
+               ',' => 'g1', # license
+               '-' => 'g3', # select -
+               '_' => 'g5', # silence
+               '>' => 'g6', # writebuf
+               '<' => 'g6', # readbuf
+               '^@'=> '=n',
+       },
+},
 }