X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/a401632a210413c3a4f0237c8fd8986bdf45934c..0934eb163565512a7e1622f931a2f6a60b7c0872:/vimperator.plp diff --git a/vimperator.plp b/vimperator.plp index 19298d1..84d9106 100644 --- a/vimperator.plp +++ b/vimperator.plp @@ -7,7 +7,7 @@ no warnings 'uninitialized'; # save some useless checks for more legible code use Shiar_Sheet::KeySigns qw(%sign); -our $VERSION = '1.0'; +our $VERSION = 'v1.0'; $header{content_type} = "text/html; charset=$sign{charset}"; @@ -28,8 +28,8 @@ $header{content_type} = "text/html; charset=$sign{charset}"; ) 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'; :> @@ -53,7 +53,7 @@ $header{content_type} = "text/html; charset=$sign{charset}"; use Shiar_Sheet::Keyboard; my $keys = Shiar_Sheet::Keyboard->new({do 'vimperator.inc.pl'}); $keys->map($get{map}) or undef $get{map}; -$keys->print_rows($get{static}); +$keys->print_rows($get{rows}); :> @@ -107,15 +107,11 @@ $keys->print_rows($get{static});