keyboard: replace vi classes by numbered key groups
[sheet.git] / less.inc.pl
index b5572eb686959e7e689820ff854373636e5e2573..c76ac73078560800c03e001b21e130f1000bf98c 100644 (file)
 use utf8;
-
-# less v418
+{ # less v418
 
 '' => {
-       desc => 'normal pager',
+       "\e"=> 'g7 mode^[',
 
-       'b' => ["page up", 'pm more'],
-       '^b'=> 'b',
-       'd' => ['scroll down', 'pm more'],
-       '^d'=> 'd',
-       'e' => 'j',
-       '^e'=> 'j',
-       'f' => ["page down", 'pm more'],
-       '^f'=> 'f',
-       'F' => ["follow", 'mo', 'Forward Forever'],
-       'g' => ["(first) line", 'pm'],
-       '^g'=> '=',
-       'G' => ["last line", 'pm'],
-       'h' => ["help", 'mo more'],
-       'H' => 'h',
-       'j' => [$sign{down}, 'pm'],
-       'k' => [$sign{up}, 'pm'],
-       '^k'=> 'k',
-       '^l'=> 'r', # more
-       'm' => ["mark pos$sign{_}ition", 'po arg'],
-       '^m'=> 'j',
-       'n' => ["next find", 'co more'],
-       'N' => ["prev find", 'co'],
-       '^n'=> 'j',
-       'p' => ["reset position", 'pm', 'beginning or Percentage'],
-       '^p'=> 'k',
-       'q' => ["quit", 'mv more'],
-       'Q' => 'q',
-       'r' => ["redraw", 'ci'],
-       '^r'=> 'r',
-       'R' => ["refresh", 'ci'],
-       's' => ["save to file", 'mv arg'],
-       't' => ["next tag", 'co'],
-       'T' => ["prev tag", 'co'],
-       'u' => ['scroll up', 'pm'],
-       '^u'=> 'u',
-       'v' => ["edit", 'mv linkvi more'],
-       '^v'=> 'f',
-       'V' => ["version", 'ci'],
-       'w' => ["page up and set window", 'pm'],
-       '^x'=> ["emacs aliases", 'mv arg mode^x'],
-       'y' => 'k',
-       '^y'=> 'k',
-       'z' => ["set page down", 'pm more'],
+       'b' => 'g2 more',
+       '^b'=> '=b',
+       'd' => 'g2 more',
+       '^d'=> '=d',
+       'e' => '=j',
+       '^e'=> '=j',
+       'f' => 'g2 more',
+       '^f'=> '=f',
+       'F' => 'g7',
+       'g' => 'g2',
+       '^g'=> '==',
+       'G' => 'g2',
+       'h' => 'g7 more',
+       'H' => '=h',
+       'j' => 'g2',
+       'k' => 'g2',
+       '^k'=> '=k',
+       '^l'=> '=r', # more
+       'm' => 'g3 arg',
+       '^m'=> '=j',
+       'n' => 'g4 more',
+       'N' => 'g4',
+       '^n'=> '=j',
+       'p' => 'g2',
+       '^p'=> '=k',
+       'q' => 'g8 more',
+       'Q' => '=q',
+       'r' => 'g1',
+       '^r'=> '=r',
+       'R' => 'g1',
+       's' => 'g8 arg',
+       't' => 'g4',
+       'T' => 'g4',
+       'u' => 'g2',
+       '^u'=> '=u',
+       'v' => 'g8 linkvi more',
+       '^v'=> '=f',
+       'V' => 'g1',
+       'w' => 'g2',
+       '^x'=> 'g8 arg mode^x',
+       'y' => '=k',
+       '^y'=> '=k',
+       'z' => 'g2 more',
 
-       '!' => ["shell command", 'mv more'],
-       '|' => ["pipe till mark", 'mv arg'],
-       ':' => ["com$sign{_}mand", 'mv arg mode:'],
-       '/' => ["find", 'co arg more'],
-       '?' => ["find rev.", 'co arg'],
-       '%' => 'p',
-       '&' => ["filter match$sign{_}es", 'co arg'],
-       "'" => ["goto mark", 'po arg'],
-       '-' => ["toggle option", 'mv arg mode-'],
-       '_' => ["show option", 'ci arg mode-'],
-       '=' => ["file name", 'ci more'],
-       '+' => ["initial cmd", 'mo'],
+       '!' => 'g8 more',
+       '|' => 'g8 arg',
+       ':' => 'g8 arg mode:',
+       '/' => 'g4 arg more',
+       '?' => 'g4 arg',
+       '%' => '=p',
+       '&' => 'g4 arg',
+       "'" => 'g3 arg',
+       '-' => 'g8 arg mode-',
+       '_' => 'g1 arg mode-',
+       '=' => 'g1 more',
+       '+' => 'g7',
 
-       '(' => ["closing", 'co'],
-       '<' => 'g',
-       '>' => 'G',
+       '(' => 'g4',
+       '<' => '=g',
+       '>' => '=G',
 },
 
-'esc' => {
-       'n' => ["any next find", 'co'],
-       'N' => ["any prev find", 'co'],
-       'u' => ["mark search", 'ci', 'Undo'],
-       'v' => 'b',
-       '(' => ["scroll left", 'pm'],
-       ')' => ["scroll right", 'pm'],
-       '<' => 'g',
-       '>' => 'G',
+'^[' => { # esc
+       "\e"=> 'g7 mode',
+       'n' => 'g4',
+       'N' => 'g4',
+       'u' => 'g1',
+       'v' => '=b',
+       '(' => 'g2',
+       ')' => 'g2',
+       '<' => '=g',
+       '>' => '=G',
 },
 
 #'^x' => {
-#      '^x' => "'",
-#      '^v' => ':e',
+#      "\e"=> 'g7 mode',
+#      '^x' => "='",
+#      '^v' => '=:e',
 #},
 
 ':' => {
-       'd' => ["drop file", 'mo'],
-       'e' => ["open file", 'mo'],
-       'f' => '=',
-       'n' => ["next file", 'mo more'],
-       'p' => ["prev file", 'mo more'],
-       'q' => 'q',
-       'Q' => ':q',
-       'x' => ["first file", 'mo'],
+       "\e"=> 'g7 mode',
+       'd' => 'g7',
+       'e' => 'g7',
+       'f' => '==',
+       'n' => 'g7 more',
+       'p' => 'g7 more',
+       'q' => '=q',
+       'Q' => '=:q',
+       'x' => 'g7',
 },
 
 '-' => {
-       'a' => ["advance find page", 'co'],
-       'b' => ["buffer space", 'mo arg'],
-       'B' => ["static buffer for pipes", 'mo'],
-       'c' => ["clear on scroll", 'pm'],
-       'd' => ["dumb term$sign{_}inal", 'mv'],
-       'D' => ["dos colours", 'mv arg ext'],
-       'e' => ["exit after eof", 'mo'],
-       'E' => ["exit at eof", 'mo'],
-       'f' => ["force open", 'mo'],
-       'F' => ["exit if 1 page", 'mo'],
-       'g' => ["hilight last match", 'co'],
-       'h' => ["scroll back limit", 'pm arg'],
-       'i' => ["ignore lower$sign{_}c$sign{_}ase", 'co'],
-       'I' => ["ignore case", 'co'],
-       'j' => ["top offset", 'po arg'],
-       'J' => ["status column", 'ci'],
-       'k' => ["key bind$sign{_}ing$sign{_}s", 'mv arg'],
-       'L' => [qq[ignore <span style="font-variant:small-caps">lesso$sign{_}pen</span> filter], 'mv'],
-       'm' => ["med. promp$sign{_}t tog$sign{_}gle", 'ci'],
-       'M' => ["long promp$sign{_}t tog$sign{_}gle", 'ci'],
-       'n' => ["count line num$sign{_}ber$sign{_}s", 'mv'],
-       'N' => ["show line n$sign{_}um$sign{_}ber$sign{_}s", 'ci'],
-       'o' => ["stdin to log", 'me arg'],
-       'O' => ["log overwrite", 'me arg'],
-       'p' => ["initial search", 'co arg'],
-       'P' => ["status line", 'ci arg', "Prompt"],
-       'q' => ["no info bell", 'mv', "Quiet"],
-       'Q' => ["no warn bell", 'mv', "Quiet!"],
-       'r' => ["raw chars", 'mv'],
-       'R' => ["ansi chars", 'mv'],
-       's' => ["squeeze blank lines", 'mv'],
-       'S' => ["no line wrap", 'mv'],
-       't' => ["find tag", 'co arg'],
-       'T' => ["tags file", 'co arg'],
-       'u' => ['parse \b \r', 'mv'],
-       'U' => ['escape \t \b \r', 'mv'],
-       'V' => 'V',
-       'w' => ["hilight page d$sign{_}own", 'mv'],
-       'W' => ["hilight forw$sign{_}ard", 'mv'],
-       'x' => ["tab stops", 'mv arg'],
-       'X' => ["no termcap init", 'mv'],
-       'y' => ["scroll limit fw$sign{_}d", 'pm arg'],
-       'z' => ["page size", 'pm arg'],
-       '"' => ["shell quotes", 'mv arg'],
-       '~' => ["outside tildes toggle", 'mv'],
-       '#' => ["col shift", 'pm arg'],
-       '-' => ["option name", 'mv arg'],
-       '+' => ["reset option", 'mv arg'],
+       "\e"=> 'g7 mode',
+       'a' => 'g4',
+       'b' => 'g7 arg',
+       'B' => 'g7',
+       'c' => 'g2',
+       'd' => 'g8',
+       'D' => 'g8 arg ext',
+       'e' => 'g7',
+       'E' => 'g7',
+       'f' => 'g7',
+       'F' => 'g7',
+       'g' => 'g4',
+       'h' => 'g2 arg',
+       'i' => 'g4',
+       'I' => 'g4',
+       'j' => 'g3 arg',
+       'J' => 'g1',
+       'k' => 'g8 arg',
+       'L' => 'g8',
+       'm' => 'g1',
+       'M' => 'g1',
+       'n' => 'g8',
+       'N' => 'g1',
+       'o' => 'g9 arg',
+       'O' => 'g9 arg',
+       'p' => 'g4 arg',
+       'P' => 'g1 arg',
+       'q' => 'g8',
+       'Q' => 'g8',
+       'r' => 'g8',
+       'R' => 'g8',
+       's' => 'g8',
+       'S' => 'g8',
+       't' => 'g4 arg',
+       'T' => 'g4 arg',
+       'u' => 'g8',
+       'U' => 'g8',
+       'V' => '=V',
+       'w' => 'g8',
+       'W' => 'g8',
+       'x' => 'g8 arg',
+       'X' => 'g8',
+       'y' => 'g2 arg',
+       'z' => 'g2 arg',
+       '"' => 'g8 arg',
+       '~' => 'g8',
+       '#' => 'g2 arg',
+       '-' => 'g8 arg',
+       '+' => 'g8 arg',
 },
 
+}