Add Table creation code

This commit is contained in:
2024-04-24 16:09:23 +01:00
parent 2d3fabcc5b
commit 9840d4171e
8 changed files with 174 additions and 73 deletions

View File

@@ -44,7 +44,12 @@
]]></Textinput>
<SubHeader><![CDATA[<h2>${value}</h2>]]></SubHeader>
<Paragraph><![CDATA[<p>${value}</p>]]></Paragraph>
<Paragraph><![CDATA[
<p>
%= l('${prefix}_${value}')
</p>
]]></Paragraph>
<Submit><![CDATA[
<span class='data'>
@@ -92,8 +97,23 @@
]]>
</password>
<Extra6><![CDATA[
<Table><![CDATA[
<table class="sme-border TableSort">
<thead>
<tr><tal:block tal:repeat="ColHead TopHeadings">
<td>${ColHead}</td></tal:block>
</tr>
</thead>
<tbody>
% my $control_data = $self->stash('${Control}');
% foreach my $row (@$control_data) {
<tr><tal:block tal:repeat="ColContent Columns">
<td><%=$row->${ColContent}%></td></tal:block>
</tr>
%}
</tbody>
</table>
]]>
</Extra6>
</Table>
</root>