Maypole::Application supports Maypole::HTTPD (which needs a patch).

[maypole.git] / templates / beer / addnew

diff --git a/templates/beer/addnew b/templates/beer/addnew
index c3d351cb40e14543e275492ea8188135b4eea5ad..ad51f01a8cfe93c49be59a825fedf6a7990a6c54 100644 (file)
--- a/templates/beer/addnew
+++ b/templates/beer/addnew
@@ -1,29 +1,21 @@
-<h3>Add a new [%classmetadata.moniker%]</h3>
 [% USE element_maker = Class("HTML::Element") %]
-<P>
-<FORM METHOD="post" ACTION="[%base%]/[%classmetadata.moniker%]/do_edit/">
-    <INPUT TYPE="hidden" NAME="action" VALUE="create">
-    <INPUT TYPE="hidden" NAME="class" VALUE="[%classmetadata.name%]">
-     [% FOR col = classmetadata.columns;
-        NEXT IF col == "id";
-        "<b>";classmetadata.colnames.$col;"</b> : "; 
-        SET element = classmetadata.cgi.$col;
-        IF col == "brewery";
-            SET create_url = base _ "/brewery/edit";
-            SET new_element = element_maker.new("option", 
-                "class", "redirect",
-                "value", create_url).push_content("Create new brewery");
-            SET child = element.content_list.first;
-            SET foo = element.attr("name", "navi");
-            SET child = child.attr("selected", "selected");
-            SET element =
-            element.unshift_content(element_maker.new("option", value," "));
-            element.attr("onChange", "go()");
-            SET element = element.unshift_content(new_element);
-        END;
-        element.as_HTML;
-        %]
-    <BR>
-    [% END; %]
-    <INPUT TYPE="submit" NAME="create" VALUE="create">
-</FORM>
+<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>