digraphs: link to and from altgr keyboards
[sheet.git] / keyboard.plp
index 4b4592775ffee14d4c182dd4b36951746cc39f9a..3a40a4d22bf9b64a0525fa5403b0481a3a7b407f 100644 (file)
@@ -22,11 +22,6 @@ my @keystyle = (
        $showkeys eq 'ghost' ? '<style> .no, .alias {opacity:.5} </style>' : (),
        '<script type="text/javascript" src="/keys.js?1.6" async></script>',
 );
        $showkeys eq 'ghost' ? '<style> .no, .alias {opacity:.5} </style>' : (),
        '<script type="text/javascript" src="/keys.js?1.6" async></script>',
 );
-if ($Request =~ /^altgr/ and open my $cssinc, '<', 'keyboard/altgr.css') {
-       local $/;
-       my $data = readline $cssinc;
-       push @keystyle, "<style>\n$data</style>";
-}
 
 Html({
        title => "\L$mode\E keyboard cheat sheet",
 
 Html({
        title => "\L$mode\E keyboard cheat sheet",
@@ -53,7 +48,7 @@ say "<p>$_</p>" for $info->{intro} // ();
 say "<h2>", $info->{mode}->{''}, " (default)</h2>"
        if $info->{mode} and %{ $info->{mode} } > 1;
 
 say "<h2>", $info->{mode}->{''}, " (default)</h2>"
        if $info->{mode} and %{ $info->{mode} } > 1;
 
-use Shiar_Sheet::Keyboard 2.08;
+use Shiar_Sheet::Keyboard 3.00;
 my $keys = Shiar_Sheet::Keyboard->new($info);
 $keys->map($get{map}) or undef $get{map};
 $keys->print_rows($get{rows} || $info->{moderows}, $info->{rows});
 my $keys = Shiar_Sheet::Keyboard->new($info);
 $keys->map($get{map}) or undef $get{map};
 $keys->print_rows($get{rows} || $info->{moderows}, $info->{rows});