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

[maypole.git] / templates / factory / edit

diff --git a/templates/factory/edit b/templates/factory/edit
index 90e87600dddd74513b651e1bcd8990a343f7b56a..6bdad79347cef088c484d66ec30a546387772fb9 100644 (file)
--- a/templates/factory/edit
+++ b/templates/factory/edit
@@ -3,28 +3,36 @@
 =head1 edit
 
 This is the edit page. It edits the passed-in object, by displaying a
-form similar to L<add_new> but with the current values filled in.
+form similar to L<addnew> but with the current values filled in.
 
-#%]
+=cut
 
+#%]
 [% PROCESS macros %]
 [% INCLUDE header %]
-
+[% INCLUDE title %]
+[% IF objects.size %]
+<div id="title">Edit a [% classmetadata.moniker %]</div>
 [% FOR item = objects; %]
-<h2> Edit [% item.name %]</h2>
-
-<FORM ACTION="[% base %]/[% item.table %]/do_edit/[% item.id %]" METHOD="post">
-[%
-     FOR col = classmetadata.columns;
-        NEXT IF col == "id";
-        "<P>";
-        "<B>"; classmetadata.colnames.$col; "</B>";
-        ": ";
-            item.to_field(col).as_HTML;
-        "</P>";
-        IF errors.$col; 
-            "<FONT COLOR=\"#ff0000\">"; errors.$col; "</FONT>";
-        END;
+<form action="[% base %]/[% item.table %]/do_edit/[% item.id %]" method="post">
+<fieldset>
+<legend>Edit [% item.name %]</legend>
+[% FOR col = classmetadata.columns;
+    NEXT IF col == "id";
+    '<label><span class="field">';
+    classmetadata.colnames.$col; ":</span>";
+    item.to_field(col).as_XML;
+    "</label>";
+    IF errors.$col; 
+       '<span class="error">'; errors.$col;'</span>';
     END;
-     '<INPUT TYPE="submit" NAME="edit" VALUE="edit">';
-END %]
+    END %]
+    <input type="submit" name="edit" value="edit"/>
+    <input type="hidden" name="__form_id" value="[% request.make_random_id %]">
+    </fieldset></form>
+    
+    [% END %]
+[% ELSE %]
+[% INCLUDE addnew %]
+[% END %]
+[% INCLUDE footer %]