use utf8;
+{
# screen version 4.00.03jw4
'' => {
- desc => 'index',
+ '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',
- 'a' => ["literal a"],
- 'A' => ["title"], # title
- '^a'=> ["command key"],
- 'b' => ["break"], # break
- 'B' => ["pow_break"], # pow_break
- '^b'=> 'b',
- 'c' => ["new"], # screen
- 'C' => ["clear"], # clear
- '^c'=> 'c',
- 'd' => ["detach"], # detach
- 'D' => ["detach"], # pow_detach
- '^d'=> 'd',
- 'f' => ["flow", # flow
- 'F' => ["fit"],
- '^f'=> 'f',
- '^g'=> ["vbell"], # vbell
- 'h' => ["hardcopy"], # hardcopy
- 'H' => ["log"], # log
- '^h'=> '^p',
- 'i' => ["prop$sign{_}erties"], # info
- 'I' => ["login on"], #XXX
- '^i'=> ["focus"], # focus
- 'k' => ["kill"], # kill
- 'K' => 'k',
- 'l' => ["redraw"], # redisplay
- 'L' => ["login"], # login
- '^l'=> 'l',
- 'm' => ["last msg"], # lastmsg
- 'M' => ["monitor"], # monitor
- '^m'=> 'm',
- 'n' => ["next"], # next
- 'N' => ["number"], # number
- '^n'=> 'n',
- 'O' => ["login off"], #XXX
- '^o'=> ["other"], # other
- 'p' => ["previous"], # prev
- '^p'=> 'p',
- 'q' => ["xon"], # xon
- 'Q' => ["only"], # only
- '^q'=> 'q',
- 'r' => ["wrap"], # wrap
- '^r'=> 'r',
- 's' => ['xoff'], # xoff
- '^s'=> 's',
- 't' => ["time"], # time
- '^t'=> 't',
- 'v' => ["version"],
- '^v'=> ["digraph"], # digraph
- 'w' => ["windows"], # windows
- 'W' => ["width"], # width
- '^w'=> 'w',
- 'x' => ["lock screen"], # lockscreen
- 'X' => ["remove"], # remove
- '^x'=> 'x',
- 'z' => ["suspend"], # suspend
- 'Z' => ["reset"],
- '^z'=> 'z',
-
- "'" => ["select"], # select
- '"' => ["windowlist -b"], # windowlist -b
- ':' => ["colon"], # colon
- '[' => ["copy"], # copy
- '^]'=> ["paste ."], # paste .
- ']' => '^]',
- '|' => ["split vert"], # split -v
- '{' => ["history"], # history
- '}' => ["history"], # history
- '=' => ["remove buf"], # removebuf
- '^?'=> '^h',
- '*' => ["displays"], # displays
- '.' => ["dumptermcap"], # dumptermcap
- ',' => ["license"], # license
- '-' => ["select -"], # select -
- '_' => ["silence"], # silence
- '>' => ["writebuf"], # writebuf
- '<' => ["readbuf"], # readbuf
- '^@'=> 'n',
+ "'" => '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',
},
+
+}