charset: utf-8 byte function table

[sheet.git] / unicode.plp
diff --git a/unicode.plp b/unicode.plp

index 4d935549f01c70bb853d65f46d7e9ea64f2ac0cb..25f89de638afb27cdbe212c52b7cea65eb9e5d63 100644 (file)
--- a/unicode.plp
+++ b/unicode.plp
@@ -16,10 +16,16 @@ $header{content_type} = 'text/html; charset=utf-8';
  <head>
  <title>digraph cheat sheet</title>
  <meta http-equiv="content-type" content="utf-8">
-<link rel="stylesheet" type="text/css" media="all" href="/digraphs.css">
+<link rel="stylesheet" type="text/css" media="all" href="/base.css"><:
+       my %styles = map {$_ => $_} qw(dark circus mono red terse);
+       our $style = exists $get{style} && $styles{$get{style}} || 'light';
+       printf(qq{\n<link rel="%s" type="text/css" media="all" href="%s" title="%s">},
+               $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "$_.css", $_
+       ) for keys %styles;
+:>
  </head>
  
-<body>
+<body id="unicode">
  <h1>Common uncommon Unicode</h1>
  
  <p>i^k in <a href="/">Vim</a>.
@@ -137,16 +143,16 @@ sub print_glyph_tables {
  
  print_glyph_tables(
         'Popular',
-       [qw{. « » . ‹ › . ‘ ’ . “ ” . „ ‚}],
-       [qw{. † ‡ • . § ¶ # . © ® ™ . − × ÷ . ± ² √}],
+       [qw{. « » . ‹ › . ‘ ’ . “ ” . „ ‚ . ‟ ‛}],
+       [qw{. † ‡ • . § ¶ # . © ® ™ . ° ′ ″ . − × ÷ . ± ² √}],
         [qw{. å ä ö ü ß . Å æ ø ű ſ}],
         [qw{. ¿ ç ñ é ê è}],
  
         'Arrows',
         [qw{. ↖ ↑ ↗ ↔ . ← - → ↕ . ↙ ↓ ↘ -}],
         [qw{. ⇖ ⇑ ⇗ ⇔ . ⇐ - ⇒ ⇕ . ⇙ ⇓ ⇘ -}],
-       [qw{. ◤ ▲ ◥ . ◀ ◆ ▶ . ◣ ▼ ◢}],
-       [qw{. ◸ △ ◹ . ◁ ◇ ▷ . ◺ ▽ ◿}],
+       [qw{. ◤ ▲ ◥   . ◀ ◆ ▶   . ◣ ▼ ◢  }],
+       [qw{. ◸ △ ◹   . ◁ ◇ ▷   . ◺ ▽ ◿  }],
  
         'Line drawing',
         [qw{. ┌ ┬ ┐ . ├ ┼ ┤ . └ ┴ ┘}],
@@ -233,7 +239,7 @@ print_glyph_tables(
                 .>M ま み む め も =
                 .>Y や =  ゆ =  よ =
                 .>R ら り る れ ろ =
-               .>W わ ゐ =  ゑ を =
+               .>W わ -ゐ = -ゑ を =
         }],
         [qw{
                   - A  I  U  E  O
@@ -269,11 +275,21 @@ print_glyph_tables(
  
  :></div>
  
-<p id="footer">
-       <a href="http://vi.shiar.net/unicode">vi.<strong>shiar.net</strong>/unicode</a>
-       <a href="git://dev.shiar.net/vi-cheat"><:= "v$VERSION" :></a>
-       created by Shiar •
-       <a title="Licensed under the GNU Affero General Public License, version 3"
+<div class="legend">
+       <table class="glyphs"><tr>
+       <td class="X di-a">ascii
+       <td class="X di-d">digraph
+       <td class="X di-prop">proposed
+       <td class="X di-b">other unicode
+       <td class="X di-rare">discouraged
+       </table>
+</div>
+
+<p class="footer">
+       <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/unicode
+       <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+       created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
+       <a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
            href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> •
         last update <:
                 use Time::Format qw(time_format);