Add in mailstats generated code amd add html object to html controls

This commit is contained in:
2025-04-06 07:58:24 +01:00
parent 9f154c586d
commit a5272319f2
10 changed files with 320 additions and 106 deletions

View File

@@ -10,6 +10,16 @@
<br></span> </p>
]]></Select>
<MultiSelect><![CDATA[
<p><span class=label>
%=l('${prefix}_${Label}')
</span><span class=data>
% my @${Name}_options = ${structure:OptionsInPerl};
% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
%= select_field '${Name}' => @${Name}_options, class => 'input', id => '${Name}_select', multiple => 'multiple'
<br></span> </p>
]]></MultiSelect>
<Textarea><![CDATA[
@@ -17,7 +27,7 @@
%=l('${prefix}_${Label}')
</span><span class=data>
% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
%= text_area '${Name}', cols=>${cols | 40}, rows=>${rows | 10}, Readonly=>'${Readonly | false}'
%= text_area '${Name}', cols=>${cols | 40}, rows=>${rows | 10}, Readonly=>'${Readonly | false}','
</span><br>
]]></Textarea>
@@ -43,7 +53,7 @@
%=l('${prefix}_${Label}')
</span><span class=data>
% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
%= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}', title =>'Pattern regex mismatch'
%= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}', title =>'Pattern regex mismatch', id => '${Name}_text'
<br></span></p>
]]></Text>
@@ -277,7 +287,7 @@
</Endgroup>
<object><![CDATA[
<object data="<%='${url}' %>" title="<%= $c->stash('title') %>" type="text/html" ><%= $c->stash('title') %> not found</object>
<object data="<%='${url}' %>" title="<%= $c->stash('title') %>" type="text/html" ><%= $c->stash('title') %> not found</object>, id => '${Name}_object
]]>
</object>