Add metadata for identical results as subpages.
Do not relocate existing pages yet though.
13 files changed:
+title => 'Less',
+version => '1.1',
+description => [
+ "Default bindings of the less pager.",
+ "Clearly shows how much it's more than more.",
+],
+keywords => [qw' less keys pager more options '],
+rows => [1, 0],
key => {
"\e"=> "alt<>/meta",
key => {
"\e"=> "alt<>/meta",
-<(common.inc.plp)><:
-
-Html({
- title => 'less cheat sheet',
- version => '1.1',
- description => [
- "Default bindings of the less pager.",
- "Clearly shows how much it's more than more.",
- ],
- keywords => [qw'
- less sheet cheat keys pager more
- shortkey reference keyboard commands options overview
- '],
- stylesheet => [qw( light dark circus mono red )],
- keys => 1,
-});
-
-:>
-<h1>Less cheat sheet</h1>
-
-<h2>normal pager (default)</h2>
-
-use Shiar_Sheet::Keyboard 2.07;
-my $info = Data('less.eng');
-my $keys = Shiar_Sheet::Keyboard->new($info);
-$keys->map($get{map}) or undef $get{map};
-$keys->print_rows($get{rows}, [1,0]);
-$keys->print_legends(\%get);
-
+$Request = 'less';
+Include 'keyboard.plp';
-<(common.inc.plp)><:
-$Request ||= 'mplayer';
-include 'keyboard.plp';
+<:
+$Request = $ENV{PATH_INFO} eq '/mpv' ? 'mpv' : 'mplayer';
+Include 'keyboard.plp';
+title => 'Mutt',
+version => '1.2',
+description => [
+ "Cheat sheet for the Mutt e-mail client,",
+ "showing the default binding for each key.",
+],
+keywords => [qw' mutt MUA email client '],
+
-<(common.inc.plp)><:
-
-Html({
- title => 'mutt cheat sheet',
- version => '1.2',
- description => [
- "Cheat sheet for the Mutt e-mail client,",
- "showing the default binding for each key.",
- ],
- keywords => [qw'
- mutt MUA email client sheet cheat reference overview commands keyboard
- '],
- stylesheet => [qw( light dark circus mono red )],
- keys => 1,
-});
-
-:>
-<h1>Mutt cheat sheet</h1>
-
-<h2>index (default)</h2>
-
-use Shiar_Sheet::Keyboard 2;
-my $info = Data('mutt.eng');
-my $keys = Shiar_Sheet::Keyboard->new($info);
-$keys->map($get{map}) or undef $get{map};
-$keys->print_rows($get{rows});
-$keys->print_legends(\%get);
-
+$Request = 'mutt';
+Include 'keyboard.plp';
+title => 'NetHack',
+version => '1.1',
+description => [
+ "Keyboard overview sheet for the Nethack console RPG game,",
+ "describing the default controls.",
+],
+keywords => [qw' nethack rogue game controls '],
+rows => [3, 2, 1, 0],
+
key => {
'b' => "step left down\nnumpad 1",
'j' => "step down\nnumpad 2",
key => {
'b' => "step left down\nnumpad 1",
'j' => "step down\nnumpad 2",
-<(common.inc.plp)><:
-
-Html({
- title => 'nethack cheat sheet',
- version => '1.1',
- description => [
- "Keyboard overview sheet for the Nethack console RPG game,",
- "describing the default controls.",
- ],
- keywords => [qw'
- nethack rogue game control controls sheet reference overview keyboard
- '],
- stylesheet => [qw( light dark circus mono red )],
- keys => 1,
-});
-
-:>
-<h1>NetHack cheat sheet</h1>
-
-<h2>normal gameplay</h2>
-
-use Shiar_Sheet::Keyboard 2;
-my $info = Data('nethack.eng');
-my $keys = Shiar_Sheet::Keyboard->new($info);
-$_->{"\e"} = ['me mode'] for values %{ $info->{def} };
- # static reset button, even though it's not (officially) in the game
-$keys->map($get{map}) or undef $get{map};
-$keys->print_rows($get{rows} || '4321-421', [3,2,1,0]);
-$keys->print_legends(\%get);
-
+$Request = 'nethack';
+$get{rows} ||= '4321-421';
+Include 'keyboard.plp';
{
# screen version 4.00.03jw4
{
# screen version 4.00.03jw4
+title => 'Screen',
+version => '1.1',
+description => [
+ "Interactive cheat sheet for the Screen terminal manager,",
+ "describing the function of each key.",
+],
+keywords => [qw' screen terminal window manager '],
key => {
'a' => "literal a",
key => {
'a' => "literal a",
-<(common.inc.plp)><:
-
-Html({
- title => 'screen cheat sheet',
- version => '1.1',
- description => [
- "Interactive cheat sheet for the Screen terminal manager,",
- "describing the function of each key.",
- ],
- keywords => [qw'
- screen sheet cheat reference overview commands keyboard
- terminal window manager
- '],
- stylesheet => [qw( light dark circus mono red )],
- keys => 1,
-});
-
-:>
-<h1>Screen cheat sheet</h1>
-
-<h2>normal mode (default)</h2>
-
-use Shiar_Sheet::Keyboard 2;
-my $info = Data('screen.eng');
-my $keys = Shiar_Sheet::Keyboard->new($info);
-$keys->map($get{map}) or undef $get{map};
-$keys->print_rows($get{rows});
-$keys->print_legends(\%get);
-
+$Request = 'screen';
+Include 'keyboard.plp';
+title => 'vi/vim',
+version => 1.5,
+description => [
+ "Interactive cheat sheet for vi text editors, notably Vim,",
+ "describing each key in various modes.",
+],
+keywords => [qw' vi vim nvi '],
+
key => {
"\e"=> "normal mode",
key => {
"\e"=> "normal mode",
-<(common.inc.plp)><:
-
-Html({
- title => 'vi cheat sheet',
- version => '1.5',
- description => [
- "Interactive cheat sheet for vi text editors, notably Vim,",
- "describing each key in various modes.",
- ],
- keywords => [qw'
- vi vim nvi sheet cheat reference overview commands keyboard
- '],
- stylesheet => [qw( light dark circus mono red )],
- keys => 1,
-});
-
-:>
-<h1>vi/vim cheat sheet</h1>
-
-<h2>normal mode (default)</h2>
-
-use Shiar_Sheet::Keyboard 2.08;
-my $info = Data('vi.eng');
-my $keys = Shiar_Sheet::Keyboard->new($info);
-$keys->map($get{map}) or undef $get{map};
-$keys->print_rows($get{rows});
-$keys->print_legends(\%get);
-
+$Request = 'vi';
+Include 'keyboard.plp';
use utf8;
# vimperator v3.16.0
{
use utf8;
# vimperator v3.16.0
{
+title => 'Vimperator',
+version => '1.3',
+description => [
+ "Interactive cheat sheet for the Vimperator (or Pentadactyl)",
+ "Firefox extension, describing the function of each key.",
+],
+keywords => [qw'vimperator firefox pentadactyl vim browser vimfx vimium cvim'],
+
key => {
'~' => "open home<>dir",
'@' => "play macro",
key => {
'~' => "open home<>dir",
'@' => "play macro",
-<(common.inc.plp)><:
-
-Html({
- title => 'vimperator cheat sheet',
- version => '1.3',
- description => [
- "Interactive cheat sheet for the Vimperator (or Pentadactyl)",
- "Firefox extension, describing the function of each key.",
- ],
- keywords => [qw'
- vimperator firefox pentadactyl vim sheet cheat reference overview
- commands keyboard browser vimfx vimium cvim
- '],
- stylesheet => [qw( light dark circus mono red )],
- keys => 1,
-});
-
-:>
-<h1>Vimperator cheat sheet</h1>
-
-<h2>normal mode (default)</h2>
-
-use Shiar_Sheet::Keyboard 2.07;
-my $info = Data('vimperator.eng');
-my $keys = Shiar_Sheet::Keyboard->new($info);
-$keys->map($get{map}) or undef $get{map};
-$keys->print_rows($get{rows});
-$keys->print_legends(\%get);
-
+$Request = 'vimperator';
+Include 'keyboard.plp';