X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/ca7123f5e6439a6726d2c603d5f51bc390916d8f..fc0efae244f2c4bf8063f5962138c2469dc44e6e:/digits.plp diff --git a/digits.plp b/digits.plp index f688d05..ec0d7ff 100644 --- a/digits.plp +++ b/digits.plp @@ -29,14 +29,14 @@ my $glyphs = Shiar_Sheet::FormatChar->new; unless (exists $get{v}) { $glyphs->{unicode}--; $glyphs->{anno} = []; - $glyphs->{style} = 0; + $glyphs->{style} = 'univer'; } my $scriptname = do 'writing-script.inc.pl'; $_ = qq{$_} for $scriptname->{latn} || (); my @table = do "writing-digits.inc.pl"; -die "Table data not found: $_.\n" for $! || $@ || (); +die "Table data not found: $_\n" for $@ || $! || (); $glyphs->print([map { ref $_ eq 'ARRAY' ? @{$_} : map { ".>$_" }