writing: common method to display (univer) legend

[sheet.git] / writing.plp

diff --git a/writing.plp b/writing.plp
index ee2d825e153f83203acaf74c49d7861a24557c28..2f08da63a3cd18d486fd7ccd97cc24eb24c85251 100644 (file)
--- a/writing.plp
+++ b/writing.plp
@@ -56,18 +56,7 @@ for (
        } @table]);
 }
 
-:></div>
+say "</div>\n";
 
-<hr>
-
-<div class="legend">
-       <table class="glyphs"><tr>
-       <td class="X l5">unicode 1.1
-       <td class="X l4">20th century
-       <td class="X l3">in 6.0 (2010)
-       <td class="X l2">recent assignments
-       <td class="X l1">proposed
-       <td class="ex">irregular
-       </table>
-</div>
+say for '<hr/>', $glyphs->legend;