X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/5f257afb85ce61ae765dffad95ce755acb760234..e3a886c4660977226601b4ab33490272e62efe36:/digits.plp diff --git a/digits.plp b/digits.plp index cfaa6ed..bc43593 100644 --- a/digits.plp +++ b/digits.plp @@ -41,9 +41,9 @@ die "Table data not found: $_\n" for $@ || $! || (); say $glyphs->tabletag; for my $row (pairs @table) { - my ($id, $cols) = @{$row}; - my $title = $scriptname->{"digits_$id"} || $scriptname->{$id} || $id; - print $glyphs->row([ ".>$title", @{$cols} ]); + my ($id, $info) = @{$row}; + my $title = $info->{title} // $scriptname->{$id} || $id; + print $glyphs->row([ ".>$title", @{$info->{list}} ]); } say '';