git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
writing: prefer regexes for unicode version
[sheet.git]
/
unicode.plp
diff --git
a/unicode.plp
b/unicode.plp
index 7100aaddf9245aad99c312b5c533303260cebfc3..095b206f9d07abd6eb2f3cbcba0e8e2d680b0fed 100644
(file)
--- a/
unicode.plp
+++ b/
unicode.plp
@@
-46,7
+46,7
@@
our $verbose = exists $get{v};
my @config = qw(
Popular
punctuation/quoting
my @config = qw(
Popular
punctuation/quoting
- common=-5
+ common=-5
?common
symbols/binary?symbols/binary=-5
latin/sample=-1
?sample=2-
symbols/binary?symbols/binary=-5
latin/sample=-1
?sample=2-
@@
-56,22
+56,23
@@
my @config = qw(
spacing
Symbols
symbols/currency
spacing
Symbols
symbols/currency
- cards
+ cards
=-3?cards
?chess
?chess
+ harvey
signs1
communic=0?communic
trinity=0?trinity
signs2
Signs
solar
signs1
communic=0?communic
trinity=0?trinity
signs2
Signs
solar
- zodiac=0?zodiac
+ zodiac=0
-1=3
?zodiac
Key_commands
keys/spacing
editing
modifier
control
command
Key_commands
keys/spacing
editing
modifier
control
command
- android
+ android
=0
ps
?player
Mathematics
ps
?player
Mathematics
@@
-117,6
+118,12
@@
my @config = qw(
?kataderiv
);
?kataderiv
);
+splice @config, 4, 2, qw(
+ latin/vowels=-5?latin/vowels
+ westeuro
+ ?easteuro
+) if exists $get{html};
+
$_ and m{/*+(.+)} and @config = split /[ ]/, $1 for $ENV{PATH_INFO}, $get{q};
my $tables = do 'unicode-table.inc.pl' or die $@ || $!;
$_ and m{/*+(.+)} and @config = split /[ ]/, $1 for $ENV{PATH_INFO}, $get{q};
my $tables = do 'unicode-table.inc.pl' or die $@ || $!;