git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
charset: support start and end parameters for unicode planes
[sheet.git]
/
charset.plp
diff --git
a/charset.plp
b/charset.plp
index 82f37f95afdea03d17810bd33857d329fa95000b..05336c1e68a10086179a21382a017c29c7e3243c 100644
(file)
--- a/
charset.plp
+++ b/
charset.plp
@@
-274,7
+274,9
@@
sub tabinput {
$row{set} = 'Unicode planes';
$row{cell} = do 'charset-ucplanes.inc.pl'
or Alert('Table data could not be read', $@ || $!);
$row{set} = 'Unicode planes';
$row{cell} = do 'charset-ucplanes.inc.pl'
or Alert('Table data could not be read', $@ || $!);
- $row{endpoint} = 1023 * $row{cell}->{colsize};
+ $row{endpoint} ||= 1023;
+ $row{endpoint} *= $row{cell}->{colsize};
+ $row{startpoint} *= $row{cell}->{colsize};
}
elsif (lc $input eq 'u') {
$row{cell} = do 'charset-unicode.inc.pl'
}
elsif (lc $input eq 'u') {
$row{cell} = do 'charset-unicode.inc.pl'