X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/544153ced65dfca53ea9195c548db7bc0fa71d71..d66fb2e242cd73e7a3b5c3980d7491080fc5f8d1:/keyboard.plp diff --git a/keyboard.plp b/keyboard.plp index 588aedc..36ccaca 100644 --- a/keyboard.plp +++ b/keyboard.plp @@ -1,114 +1,37 @@ <(common.inc.plp)><: - our $VERSION = 'v1.0'; - use Shiar_Sheet::KeySigns qw(%sign); - -:> - - - - -keyboard cheat sheet -<:= stylesheet(qw'light dark circus mono red terse') :> - -<: - our $showkeys = exists $get{keys} && $get{keys} ne '0'; - print "\n".'' - unless $showkeys; - print "\n".'' - if $showkeys and $get{keys} eq 'ghost'; -:> - - - - -

keyboard cheat sheet

- -

normal mode (default)

- - -
+%{$info} or Abort( + "Requested keyboard $mode not available", + '404 request not found', +); -
-
-
-
info -
Info command: shows/does something without altering anything. -
motion -
positioning -
Other movement (jumps, window (re)positioning). -
command -
Direct action command. -
ins mode -
Enters Insert or Replace mode. -
mode -
Enters a different mode. -
vis mode -
Enters Visual or Select mode. -
key cmd -
Additional key commands (click for overview). -
-
+say "

$mode cheat sheet

"; +say "

$_

" for $info->{intro} // (); +say "

", $info->{mode}->{''}, " (default)

" + if $info->{mode} and %{ $info->{mode} } > 1; -
-
-
- - -
-
- - +use Shiar_Sheet::Keyboard 2.08; +my $keys = Shiar_Sheet::Keyboard->new($info); +$keys->map($get{map}) or undef $get{map}; +$keys->print_rows($get{rows}, $info->{rows}); +$keys->print_legends(\%get); -