From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 9 Oct 2008 23:37:49 +0000 (+0000)
Subject: unicode: separate+improved Blocks section
X-Git-Tag: v1.2~21
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/a60151fdf6594651f38af2107d0653a140822803?ds=sidebyside

unicode: separate+improved Blocks section

Add several block drawing chars (most of them digraphless, but useful in
any case), and categorize them separately from the more general Signs.

Bonusally, fix the sign for 'sun'.
---

diff --git a/unicode.plp b/unicode.plp
index 73d07a5..a6a33bd 100644
--- a/unicode.plp
+++ b/unicode.plp
@@ -176,14 +176,21 @@ print table(@$_) for (
 	[ 3 => [qw{. ╓ ╥ ╖ . ╟ ╫ ╢ . ╙ ╨ ╜ }]],
 );
 
-print "<h2>Signs</h2>\n\n";
+print "<h2>Blocks</h2>\n\n";
 print table(@$_) for (
-	[ 3 => [qw{. ▘ ▀ ▝ . ▌ █ ▐ . ▖ ▄ ▗ . ░ ▒ ▓}]],
+	[ 3 => [qw{. ▘ ▀ ▝ . ▌ █ ▐ . ▖ ▄ ▗ }]],
+	[ 3 => [qw{. ░ . ▒ . ▓ }]],
+	[ 2 => [qw{. ▛ ▚ ▟ . ▙ ▞ ▜ }]],
+	[ 2 => [qw{. ▁ ▂ ▃ ▄ ▅ ▆ ▇ ▔ . ▏ ▎ ▍ ▌ ▋ ▊ ▉ ▕ }]],
 	[ 3 => [qw{. □ ▣ ■ . ▤ ▦ ▥ . ▧ ▩ ▨}]],
-	[ 4 => [qw{. ♠ ♡ ♢ ♣ . ♤ ♥ ♦ ♧}]],
-	[ 5 => [qw{. ☼ ☿ ♀ ♁ ♂ ♃ ♄ ♅ ♆ ♇}]],  # solar
-#	[12 => [qw{. ♈ ♉ ♊ ♋ ♌ ♍ ♎ ♏ ♐ ♑ ♒ ♓}]],  # zodiac
+);
+
+print "<h2>Signs</h2>\n\n";
+print table(@$_) for (
 	[ 8 => [qw{. ¤ ¢ ₥ € £ ₨ $ ¥ . ₫ ₭ ₦ ₱ ₧ ₮ ₩ ₪}]],
+	[ 4 => [qw{. ♠ ♡ ♢ ♣ . ♤ ♥ ♦ ♧}]],
+	[ 5 => [qw{. ☉ ☿ ♀ ♁ ♂ ♃ ♄ ♅ ♆ ♇}]],  # solar
+	[12 => [qw{. ♈ ♉ ♊ ♋ ♌ ♍ ♎ ♏ ♐ ♑ ♒ ♓}]],  # zodiac
 );
 
 print "<h2>IPA</h2>\n\n";