summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
5cae863)
Avoid multiple loads of same data in unicode preset.
}},
u => {setup => sub {
my $row = shift;
}},
u => {setup => sub {
my $row = shift;
- $row->{cell} = do 'charset-unicode.inc.pl'
+ state $celldata = do 'charset-unicode.inc.pl'
or Alert('Table data could not be read', $@ || $!);
or Alert('Table data could not be read', $@ || $!);
+ $row->{cell} = $celldata;
$row->{endpoint} ||= 0x1FFF;
$row->{set} = 'Unicode ' . (
$row->{endpoint} ||= 0x1FFF;
$row->{set} = 'Unicode ' . (