X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/2e8c1e3cc39cc1c6e4b858242d2a3a39481b9640..c4ca0bd3e94a7978772dadaa3b941ecc84741407:/keyboard/less.eng.inc.pl

diff --git a/keyboard/less.eng.inc.pl b/keyboard/less.eng.inc.pl
index 9000189..b73c34f 100644
--- a/keyboard/less.eng.inc.pl
+++ b/keyboard/less.eng.inc.pl
@@ -11,113 +11,6 @@ description => [
 keywords => [qw' less keys pager more options '],
 rows => [1, 0],
 
-key => {
-	"\e"=> "alt<>/meta",
-
-	'b' => "page up",
-	'd' => 'scroll down',
-	'f' => "page down",
-	'F' => "follow\nForward Forever",
-	'g' => "(first) line",
-	'G' => "last line",
-	'h' => "help",
-	'j' => "<down>",
-	'k' => "<up>",
-	'm' => "mark pos<>ition",
-	'n' => "next find",
-	'N' => "prev find",
-	'p' => "reset position\nbeginning or Percentage",
-	'q' => "quit",
-	'r' => "redraw",
-	'R' => "refresh",
-	's' => "save to file",
-	't' => "next tag",
-	'T' => "prev tag",
-	'u' => 'scroll up',
-	'v' => "edit",
-	'V' => "version",
-	'w' => "page up and set window",
-	'^x'=> "emacs aliases",
-	'z' => "set page down",
-
-	'!' => "shell command",
-	'|' => "pipe till mark",
-	':' => "com<>mand",
-	'/' => "find",
-	'?' => "find rev.",
-	'&' => "filter match<>es",
-	"'" => "goto mark",
-	'-' => "toggle option",
-	'_' => "show option",
-	'=' => "file name",
-	'+' => "initial cmd",
-
-	'(' => "closing",
-
-	"^[\e"=> "noop",
-	'^[n' => "any next find",
-	'^[N' => "any prev find",
-	'^[u' => "mark search\nUndo",
-	'^[(' => "scroll left",
-	'^[)' => "scroll right",
-
-	":\e"=> "noop",
-	':d' => "drop file",
-	':e' => "open file",
-	':n' => "next file",
-	':p' => "prev file",
-	':x' => "first file",
-
-	"-\e"=> "noop",
-	'-a' => "advance find page",
-	'-b' => "buffer space",
-	'-B' => "static buffer for pipes",
-	'-c' => "clear on scroll",
-	'-d' => "dumb term<>inal",
-	'-D' => "dos colours",
-	'-e' => "exit after eof",
-	'-E' => "exit at eof",
-	'-f' => "force open",
-	'-F' => "exit if 1 page",
-	'-g' => "hilight last match",
-	'-h' => "scroll back limit",
-	'-i' => "ignore lower<>c<>ase",
-	'-I' => "ignore case",
-	'-j' => "top offset",
-	'-J' => "status column",
-	'-k' => "key bind<>ing<>s",
-	'-L' => qq[ignore <span style="font-variant:small-caps">lesso<>pen</span> filter],
-	'-m' => "med. promp<>t tog<>gle",
-	'-M' => "long promp<>t tog<>gle",
-	'-n' => "count line num<>ber<>s",
-	'-N' => "show line n<>um<>ber<>s",
-	'-o' => "stdin to log",
-	'-O' => "log over<>wr<>ite",
-	'-p' => "initial search",
-	'-P' => "status line\nPrompt",
-	'-q' => "no info bell\nQuiet",
-	'-Q' => "no warn bell\nQuiet!",
-	'-r' => "raw chars",
-	'-R' => "ansi chars",
-	'-s' => "squeeze blank lines",
-	'-S' => "no line wrap",
-	'-t' => "find tag",
-	'-T' => "tags file",
-	'-u' => 'parse \b \r',
-	'-U' => 'escape \t \b \r',
-	'-w' => "hilight page d<>own",
-	'-W' => "hilight forw<>ard",
-	'-x' => "tab stops",
-	'-X' => "no termcap init",
-	'-y' => "scroll limit fw<>d",
-	'-z' => "page size",
-	'-"' => "shell quotes",
-	'-~' => "outside tildes toggle",
-	'-#' => "col shift",
-	'--' => "option name",
-	'-+' => "reset option",
-},
-
 mode => {
 	''   => 'normal pager',
 	'^[' => 'escape keys (hold meta/alt)',
@@ -139,150 +32,150 @@ flag => {
 
 def => {
 	'' => {
-		"\e"=> 'g7 mode^[',
-
-		'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',
-
-		'!' => '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',
-
-		'(' => 'g4',
-		'<' => '=g',
-		'>' => '=G',
+		"\e"=> ['g7 mode^[', "alt<>/meta"],
+
+		'b' => ['g2 more', "page up"],
+		'^b'=> \'b',
+		'd' => ['g2 more', 'scroll down'],
+		'^d'=> \'d',
+		'e' => \'j',
+		'^e'=> \'j',
+		'f' => ['g2 more', "page down"],
+		'^f'=> \'f',
+		'F' => ['g7', "follow\nForward Forever"],
+		'g' => ['g2', "(first) line"],
+		'^g'=> \'=',
+		'G' => ['g2', "last line"],
+		'h' => ['g7 more', "help"],
+		'H' => \'h',
+		'j' => ['g2', "<down>"],
+		'k' => ['g2', "<up>"],
+		'^k'=> \'k',
+		'^l'=> \'r', # more
+		'm' => ['g3 arg', "mark pos<>ition"],
+		'^m'=> \'j',
+		'n' => ['g4 more', "next find"],
+		'N' => ['g4', "prev find"],
+		'^n'=> \'j',
+		'p' => ['g2', "reset position\nbeginning or Percentage"],
+		'^p'=> \'k',
+		'q' => ['g8 more', "quit"],
+		'Q' => \'q',
+		'r' => ['g1', "redraw"],
+		'^r'=> \'r',
+		'R' => ['g1', "refresh"],
+		's' => ['g8 arg', "save to file"],
+		't' => ['g4', "next tag"],
+		'T' => ['g4', "prev tag"],
+		'u' => ['g2', 'scroll up'],
+		'^u'=> \'u',
+		'v' => ['g8 linkvi more', "edit"],
+		'^v'=> \'f',
+		'V' => ['g1', "version"],
+		'w' => ['g2', "page up and set window"],
+		'^x'=> ['g8 arg mode^x', "emacs aliases"],
+		'y' => \'k',
+		'^y'=> \'k',
+		'z' => ['g2 more', "set page down"],
+
+		'!' => ['g8 more', "shell command"],
+		'|' => ['g8 arg', "pipe till mark"],
+		':' => ['g8 arg mode:', "com<>mand"],
+		'/' => ['g4 arg more', "find"],
+		'?' => ['g4 arg', "find rev."],
+		'%' => \'p',
+		'&' => ['g4 arg', "filter match<>es"],
+		"'" => ['g3 arg', "goto mark"],
+		'-' => ['g8 arg mode-', "toggle option"],
+		'_' => ['g1 arg mode-', "show option"],
+		'=' => ['g1 more', "file name"],
+		'+' => ['g7', "initial cmd"],
+
+		'(' => ['g4', "closing"],
+		'<' => \'g',
+		'>' => \'G',
 	},
 
 	'^[' => { # esc
-		"\e"=> 'g7 mode',
-		'n' => 'g4',
-		'N' => 'g4',
-		'u' => 'g1',
-		'v' => '=b',
-		'(' => 'g2',
-		')' => 'g2',
-		'<' => '=g',
-		'>' => '=G',
+		"\e"=> ['g7 mode', "noop"],
+		'n' => ['g4', "any next find"],
+		'N' => ['g4', "any prev find"],
+		'u' => ['g1', "mark search\nUndo"],
+		'v' => \'b',
+		'(' => ['g2', "scroll left"],
+		')' => ['g2', "scroll right"],
+		'<' => \'g',
+		'>' => \'G',
 	},
 
 	#'^x' => {
 	#	"\e"=> 'g7 mode',
-	#	'^x' => "='",
-	#	'^v' => '=:e',
+	#	'^x' => \"'",
+	#	'^v' => \':e',
 	#},
 
 	':' => {
-		"\e"=> 'g7 mode',
-		'd' => 'g7',
-		'e' => 'g7',
-		'f' => '==',
-		'n' => 'g7 more',
-		'p' => 'g7 more',
-		'q' => '=q',
-		'Q' => '=:q',
-		'x' => 'g7',
+		"\e"=> ['g7 mode', "noop"],
+		'd' => ['g7', "drop file"],
+		'e' => ['g7', "open file"],
+		'f' => \'=',
+		'n' => ['g7 more', "next file"],
+		'p' => ['g7 more', "prev file"],
+		'q' => \'q',
+		'Q' => \':q',
+		'x' => ['g7', "first file"],
 	},
 
 	'-' => {
-		"\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' => 'g8 arg',
-		'O' => 'g8 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',
+		"\e"=> ['g7 mode', "noop"],
+		'a' => ['g4', "advance find page"],
+		'b' => ['g7 arg', "buffer space"],
+		'B' => ['g7', "static buffer for pipes"],
+		'c' => ['g2', "clear on scroll"],
+		'd' => ['g8', "dumb term<>inal"],
+		'D' => ['g8 arg ext', "dos colours"],
+		'e' => ['g7', "exit after eof"],
+		'E' => ['g7', "exit at eof"],
+		'f' => ['g7', "force open"],
+		'F' => ['g7', "exit if 1 page"],
+		'g' => ['g4', "hilight last match"],
+		'h' => ['g2 arg', "scroll back limit"],
+		'i' => ['g4', "ignore lower<>c<>ase"],
+		'I' => ['g4', "ignore case"],
+		'j' => ['g3 arg', "top offset"],
+		'J' => ['g1', "status column"],
+		'k' => ['g8 arg', "key bind<>ing<>s"],
+		'L' => ['g8', qq[ignore <span style="font-variant:small-caps">lesso<>pen</span> filter]],
+		'm' => ['g1', "med. promp<>t tog<>gle"],
+		'M' => ['g1', "long promp<>t tog<>gle"],
+		'n' => ['g8', "count line num<>ber<>s"],
+		'N' => ['g1', "show line n<>um<>ber<>s"],
+		'o' => ['g8 arg', "stdin to log"],
+		'O' => ['g8 arg', "log over<>wr<>ite"],
+		'p' => ['g4 arg', "initial search"],
+		'P' => ['g1 arg', "status line\nPrompt"],
+		'q' => ['g8', "no info bell\nQuiet"],
+		'Q' => ['g8', "no warn bell\nQuiet!"],
+		'r' => ['g8', "raw chars"],
+		'R' => ['g8', "ansi chars"],
+		's' => ['g8', "squeeze blank lines"],
+		'S' => ['g8', "no line wrap"],
+		't' => ['g4 arg', "find tag"],
+		'T' => ['g4 arg', "tags file"],
+		'u' => ['g8', 'parse \b \r'],
+		'U' => ['g8', 'escape \t \b \r'],
+		'V' => \'V',
+		'w' => ['g8', "hilight page d<>own"],
+		'W' => ['g8', "hilight forw<>ard"],
+		'x' => ['g8 arg', "tab stops"],
+		'X' => ['g8', "no termcap init"],
+		'y' => ['g2 arg', "scroll limit fw<>d"],
+		'z' => ['g2 arg', "page size"],
+		'"' => ['g8 arg', "shell quotes"],
+		'~' => ['g8', "outside tildes toggle"],
+		'#' => ['g2 arg', "col shift"],
+		'-' => ['g8 arg', "option name"],
+		'+' => ['g8 arg', "reset option"],
 	},
 },
 }