- Improving TimesheetNewPage as component page

- Imrpoving DynField performance

www/new.adp

@@ -2,6 +2,7 @@
 <property name="title">@page_title@</property>
 <property name="context">@context;noquote@</property>
 <property name="main_navbar_label">projects</property>
+<property name="focus">@focus;noquote@</property>
 
 <h2>@page_title@</h2>
 
@@ -9,11 +10,12 @@
   <div class="general-message">@message@</div>
 </if>
 
-<property name="focus">@focus;noquote@</property>
+<% set return_url [im_url_with_query] %>
 
 <table width="100%">
   <tr valign="top">
     <td width="50%">
+
       <table cellpadding=2 cellspacing=0 border=1 frame=void width='100%'>
         <tr>
          <td class=tableheader align=left width='99%'>Task</td>
@@ -24,14 +26,17 @@
       </table>
       <br>
 
-<% set return_url [im_url_with_query] %>
-
-<% if { $form_mode!="edit" } { %>
+<if @form_mode@ eq "display" >
       <%= [im_component_bay left] %>
+</if>
+
     </td>
     <td width="50%">
+
+<if @form_mode@ eq "display" >
       <%= [im_component_bay right] %>
-<% } %>
+</if>
+
 
     </td>
   </tr>

www/new.tcl

@@ -164,10 +164,13 @@ ad_form \
 	{note:text(textarea),optional {label "Note"} {html {cols 40}}}
 	{start_date:date(date),optional {label "Start Date"} {}}
 	{end_date:date(date),optional {label "End Date"} {}}
-	
     }
 
 
+# Fix for problem changing to "edit" form_mode
+set form_action [template::form::get_action "task"]
+if {"" != $form_action} { set form_mode "edit" }
+
 ad_form -extend -name task -on_request {
     # Populate elements from local variables