unicode: option for common number derivatives

Notable characters missing for latin1 coverage:
superscript 1-3 (2 already present) and quarter fractions.

diff --git a/unicode-table.inc.pl b/unicode-table.inc.pl
index 7ab3dd3c79292f96791019ebac85e436dde9288c..5e79610b32326fe41fb9e35cd24e2e9678a26087 100644 (file)
--- a/unicode-table.inc.pl
+++ b/unicode-table.inc.pl
@@ -3,7 +3,11 @@ use utf8;
 
 punctuation => {
        quoting  => [qw{. « » . ‹ › . ‘ ’ . “ ” . „ ‚ . ‟ ‛}],
-       common   => [qw{. † ‡ • . § ¶ # . © ® ™ . ° ′ ″ . − × ÷ . ± ² √ . 年 月 日}],
+       common   => [qw{
+               . † ‡ • . § ¶ # . © ® ™
+               . ° ′ ″ . − × ÷ . ± ² √
+               . ¹ ⁿ ³ . ¼ ½ ¾ . 年 月 日
+       }],
        marks    => [qw{. ¿ … 〃 ‐ – . ‽ · ※ ‒ — }],
        spacing  => [split / /, join ' ',
                ". \x{2003} \x{2009} \x{2007} \x{A0} \x{200B}",

diff --git a/unicode.plp b/unicode.plp
index 76c31ec6f37e4c9312898a22f4cb84abe583565b..7a70b270cf4175644314b2688eca9a514ff9c529 100644 (file)
--- a/unicode.plp
+++ b/unicode.plp
@@ -46,7 +46,7 @@ our $verbose = exists $get{v};
 my @config = qw(
        Popular
                punctuation/quoting
-                       common=-5
+                       common=-5?common
                symbols/binary?symbols/binary=-5
                latin/sample=-1
                        ?sample=2-