X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/587ac438d1321ac08955a251401c06668a3d1ee9..8906eed99fd6e7be8f39bd77dcde3effa29e50df:/less.inc.pl

diff --git a/less.inc.pl b/less.inc.pl
index b5572eb..8480d8c 100644
--- a/less.inc.pl
+++ b/less.inc.pl
@@ -1,147 +1,151 @@
 use utf8;
+{ # less v418
 
-# less v418
+	'' => {
+		"\e"=> 'g7 mode^[',
 
-'' => {
-	desc => 'normal pager',
+		'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',
 
-	'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'],
+		'!' => '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',
 
-	'!' => ["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'],
+		'(' => 'g4',
+		'<' => '=g',
+		'>' => '=G',
+	},
 
-	'(' => ["closing", 'co'],
-	'<' => 'g',
-	'>' => 'G',
-},
+	'^[' => { # esc
+		"\e"=> 'g7 mode',
+		'n' => 'g4',
+		'N' => 'g4',
+		'u' => 'g1',
+		'v' => '=b',
+		'(' => 'g2',
+		')' => 'g2',
+		'<' => '=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',
-},
+	#'^x' => {
+	#	"\e"=> 'g7 mode',
+	#	'^x' => "='",
+	#	'^v' => '=:e',
+	#},
 
-#'^x' => {
-#	'^x' => "'",
-#	'^v' => ':e',
-#},
+	':' => {
+		"\e"=> 'g7 mode',
+		'd' => 'g7',
+		'e' => 'g7',
+		'f' => '==',
+		'n' => 'g7 more',
+		'p' => 'g7 more',
+		'q' => '=q',
+		'Q' => '=:q',
+		'x' => 'g7',
+	},
 
-':' => {
-	'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'],
-},
-
-'-' => {
-	'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' => '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',
+	},
 
+}