overhaul keyboard module include syntax

[sheet.git] / less.plp

diff --git a/less.plp b/less.plp
index ce5ca14a6cb0b1c7e9239413aa71d1d509594e92..52ca4710bc6544bf03c38748ff7dd88fe9797780 100644 (file)
--- a/less.plp
+++ b/less.plp
@@ -2,7 +2,7 @@
 
 Html({
        title => 'less cheat sheet',
-       version => 'v1.0',
+       version => 'v1.1',
        description => [
                "Default bindings of the less pager.",
                "Clearly shows how much it's more than more.",
@@ -26,9 +26,9 @@ Html({
 <li class="row"><ul>
        <li>
                <ul class="keys omni">
-               <li class="mo chr27" onclick="setmode('modeesc')"><b>Esc</b> alt<:=$sign{_}:>/meta
+               <li class="mo chr27" onclick="setmode('mode_c_sbo')"><b>Esc</b> alt<:=$sign{_}:>/meta
                </ul>
-       <li class="mode modeesc">
+       <li class="mode mode_c_sbo">
                <ul class="keys omni">
                <li class="mo chr27" onclick="setmode()"><b>Esc</b> noop
                </ul>
@@ -47,8 +47,10 @@ Html({
        </ul>
 
 <:
-use Shiar_Sheet::Keyboard;
-my $keys = Shiar_Sheet::Keyboard->new({do 'less.inc.pl'});
+use Shiar_Sheet::Keyboard 2;
+my $info = do 'less.eng.inc.pl' or die $@;
+$info->{def} = do 'less.inc.pl';
+my $keys = Shiar_Sheet::Keyboard->new($info);
 $keys->map($get{map}) or undef $get{map};
 $keys->print_rows($get{rows}, [1,0]);
 :>