digits: table data in extensible hashes
[sheet.git] / digits.plp
index cfaa6eda42fbd3f8b1c916fe427a8e3f7134ed84..07b4a12ec3edc796cebd1ef442ac07dc1817072a 100644 (file)
@@ -41,9 +41,9 @@ die "Table data not found: $_\n" for $@ || $! || ();
 
 say $glyphs->tabletag;
 for my $row (pairs @table) {
-       my ($id, $cols) = @{$row};
+       my ($id, $info) = @{$row};
        my $title = $scriptname->{"digits_$id"} || $scriptname->{$id} || $id;
-       print $glyphs->row([ ".>$title", @{$cols} ]);
+       print $glyphs->row([ ".>$title", @{$info->{list}} ]);
 }
 say '</table>';