X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/a84b651b70f484379de8ac84a2abac91e59c1a6e..5ff4b1c1b790314cd654d32ca6d72368d1748283:/vim.plp diff --git a/vim.plp b/vim.plp index 36975e3..19ba68e 100644 --- a/vim.plp +++ b/vim.plp @@ -5,72 +5,36 @@ use warnings; no warnings 'qw'; # you know what you doing no warnings 'uninitialized'; # save some useless checks for more legible code -our $VERSION = '1.1'; - -our $ascii = 0; -if (exists $get{ascii}) { - $ascii = $get{ascii} ne '0'; # manual override -} elsif (defined $ENV{HTTP_ACCEPT_CHARSET}) { - $ascii = 1; - for (split q{,}, $ENV{HTTP_ACCEPT_CHARSET}) { - $ascii = 0, last if $_ eq '*' or m{utf-?8}i; - } -} - -my $charset = $ascii ? 'us-ascii' : 'utf-8'; -my $ctype = "text/html; charset=$charset"; -$header{content_type} = $ctype; +use Shiar_Sheet::KeySigns qw(%sign); # dependant on $get{ascii} + +our $VERSION = 'v1.2'; + +$header{content_type} = "text/html; charset=$sign{charset}"; :> + vi cheat sheet - <: - my %styles = map {$_ => $_} qw(dark circus mono terse); + my %styles = map {$_ => $_} qw(dark circus mono red terse); our $style = exists $get{style} && $styles{$get{style}} || 'light'; printf(qq{\n}, $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "$_.css", $_ ) for keys %styles; our $showkeys = exists $get{keys} && $get{keys} ne '0'; - print "\n" unless $showkeys; - print "\n" + print "\n".'' unless $showkeys; + print "\n".'' if $showkeys and $get{keys} eq 'ghost'; :> + - - - +

vi/vim cheat sheet

@@ -80,30 +44,16 @@ function setmode(classname) {
  • <: -our %sign = ( - arg => $ascii ? '.' : '·', # described as 'dot' - motion => $ascii ? '|' : '↕', - alias => $ascii ? 'see: ' : '»', - up => $ascii ? 'up' : '▲', - right => $ascii ? 'right' : '▶', - down => $ascii ? 'down' : '▼', - left => $ascii ? 'left' : '◀', - sep => $ascii ? '*' : '•', - _ => exists $get{ascii} && !$ascii ? "\x{200b}" : '', - # use the correct ZWNJ only when unicode is forced on - # default to use unofficial html for best support -); - use Shiar_Sheet::Keyboard; my $keys = Shiar_Sheet::Keyboard->new({do 'vim.inc.pl'}); $keys->map($get{map}) or undef $get{map}; -$keys->print_rows($get{static}); +$keys->print_rows($get{rows}); :> @@ -137,9 +87,9 @@ $keys->print_rows($get{static});
    Commands with a dot need a char argument afterwards.
    key<:= $sign{motion} :>
    Requires a motion afterwards, operates between cursor and destination. -
    vim +
    vim
    Not in original Vi (assessment incomplete). -
    vim7 +
    vim7
    New in vim version 7.x. @@ -147,8 +97,8 @@ $keys->print_rows($get{static});
  • keyboard map is <:= $get{map} ? 'set to ' : '' :><:= $keys->{map} :>
  • ascii mode is - <:= exists $get{ascii} && 'forced ' :><:= - $ascii ? 'on' : 'off' :> + <:= defined $sign{-ascii} && 'forced ' :><:= + $sign{-ascii} ? 'on' : 'off' :>
  • keys are <:= $showkeys ? 'always shown' : 'hidden if unassigned' :><:= !exists $get{keys} && ' by default' :> @@ -159,15 +109,11 @@ $keys->print_rows($get{static});