moved templates

[maypole.git] / lib / Maypole / templates / beer / addnew

diff --git a/lib/Maypole/templates/beer/addnew b/lib/Maypole/templates/beer/addnew
new file mode 100644 (file)
index 0000000..ad51f01
--- /dev/null
+++ b/lib/Maypole/templates/beer/addnew
@@ -0,0 +1,21 @@
+[% USE element_maker = Class("HTML::Element") %]
+<div id="addnew">
+<form method="post" action="[% base %]/[% classmetadata.moniker %]/do_edit/">
+<fieldset>
+<legend>Add a new [%classmetadata.moniker%]</legend>
+    <input type="hidden" name="action" value="create"/>
+    <input type="hidden" name="class" value="[% classmetadata.name %]"/>
+        [% FOR col = classmetadata.columns;
+            NEXT IF col == "id";
+            SET element = classmetadata.cgi.$col;
+            %]
+       <label>
+                <span class="field">[% classmetadata.colnames.$col; %]</span>
+                [% element.as_XML; %]</label>
+               
+        [% END; %]
+       
+    <input type="submit" name="create" value="create"/>
+    </fieldset>
+</form>
+</div>