unicode: whitespace characters
authorMischa POSLAWSKY <perl@shiar.org>
Sat, 25 Dec 2010 04:41:30 +0000 (05:41 +0100)
committerMischa POSLAWSKY <perl@shiar.org>
Tue, 11 Jan 2011 22:41:38 +0000 (23:41 +0100)
unicode.inc.pl
unicode.plp

index ca1bbf9..3907553 100644 (file)
@@ -4,6 +4,10 @@ punctuation => {
        quoting  => [qw{. « » . ‹ › . ‘ ’ . “ ” . „ ‚ . ‟ ‛}],
        common   => [qw{. † ‡ • . § ¶ # . © ® ™ . ° ′ ″ . − × ÷ . ± ² √ . 年 月 日}],
        marks    => [qw{. ¿ … 〃 ‐ – . ‽ · ※ ‒ — }],
+       spacing  => [split / /, join ' ',
+               ". \x{2003} \x{2009} \x{2007} \x{A0} \x{200B}",
+               ". \x{2002} \x{200A} \x{2008} \x{AD} \x{200C}",
+       ],
        version  => [qw{. α β}],
 },
 
index e3d7402..3173cfd 100644 (file)
@@ -83,6 +83,7 @@ $glyphs->print(map {
                        ?uncommon
                punctuation/version
                punctuation/marks
+                       spacing
        Symbols
                symbols/currency
                        cards