]> git.decadent.org.uk Git - maypole.git/blob - templates/beer/addnew
32b97db0e89b17da97fb13a43c7006ebb1cead71
[maypole.git] / templates / beer / addnew
1 [% USE element_maker = Class("HTML::Element") %]
2 <form method="post" action="[% base %]/[% classmetadata.moniker %]/do_edit/">
3 <fieldset>
4 <legend>Add a new [%classmetadata.moniker%]</legend>
5     <input type="hidden" name="action" value="create"/>
6     <input type="hidden" name="class" value="[% classmetadata.name %]"/>
7         [% FOR col = classmetadata.columns;
8             NEXT IF col == "id";
9             SET element = classmetadata.cgi.$col;
10             %]
11         <label>
12                 <span class="field">[% classmetadata.colnames.$col; %]</span>
13                 [% element.as_XML; %]</label>
14                 
15         [% END; %]
16         
17     <input type="submit" name="create" value="create"/>
18     </fieldset>
19 </form>