Add in original html - play with sanitising paragraphs

Templates/custom.pm.tem

@@ -33,8 +33,14 @@ our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");
 # Get control data for tables(s)
 <tal:block tal:repeat="tablecontrol tablecontrols">
 	sub get_${tablecontrol} {
+		# Return an array of hashes of the contents for each row and column for ${tablecontrol}
+		# default is a single row of strings "col1header-1, col2header-1, col3Header-1 etc"
 		my $c = shift;
-		my @ret = {};
+		my $control_data = $self->stash('${TableControl}');
+		my @ret = {}
+#		foreach my $colHead (@$control_data) {
+#			my ret{$colHead} = "$colhead-1"
+#		};
 		return \@ret
 	}
 </tal:block>

Templates/html_controls.html.ep.xml

@@ -49,7 +49,7 @@
 	
 	<Paragraph><![CDATA[
 		<p>
-			%= l('${value}')
+			%=l('${value}')
 		</p>
 	]]></Paragraph>
 
@@ -125,4 +125,11 @@
 	]]>
 	</Preformatted>
 	
+	<submit><![CDATA[
+		<p>	<br>
+			%= submit_button "${Value}", class => 'action'
+		</p>
+		]]>
+	</submit>
+	
 </root>