Index: openacs-4/contrib/packages/project-manager/www/add-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/add-edit.tcl,v
diff -u -r1.16.2.4 -r1.16.2.5
--- openacs-4/contrib/packages/project-manager/www/add-edit.tcl	16 Sep 2004 19:35:52 -0000	1.16.2.4
+++ openacs-4/contrib/packages/project-manager/www/add-edit.tcl	16 Dec 2004 16:22:53 -0000	1.16.2.5
@@ -112,19 +112,20 @@
             {options {{"--- TBD ---" ""} [db_list_of_lists get_customer "select o.name, o.organization_id from organizations o order by o.name"]}}
         }
 
-        {planned_start_date:date,to_sql(linear_date)
+        {planned_start_date:text(text)
             {label "Starts"}
-            {value $planned_start_date}
-            {today}
-            {help}
+	    {html {id sel1}}
+	    {after_html {<input type='reset' value=' ... ' onclick=\"return showCalendar('sel1', 'y-m-d');\"> \[<b>y-m-d </b>\]
+	    }}
         }
         
-        {planned_end_date:date,to_sql(linear_date) 
+        {planned_end_date:text(text) 
             {label "Deadline"}
-            {value $planned_end_date}
-            {today}
-            {help}
+	    {html {id sel2}}
+	    {after_html {<input type='reset' value=' ... ' onclick=\"return showCalendar('sel2', 'y-m-d');\"> \[<b>y-m-d </b>\]
+	    }}
         }
+
         
         {ongoing_p:text(select)
             {label "Project is ongoing?"}
@@ -204,9 +205,13 @@
         }
 
         set planned_end_date [util::date acquire clock [clock scan $planned_end_date]]
-
+        set planned_end_date "[lindex $planned_end_date 0]-[lindex $planned_end_date 1]-[lindex $planned_end_date 2]"
         set planned_start_date [util::date acquire clock [clock scan $planned_start_date]]
-        
+       set planned_start_date "[lindex $planned_start_date 0]-[lindex $planned_start_date 1]-[lindex $planned_start_date 2]"
+	
+	
+	 
+
     } \
     -new_data {
 
@@ -264,7 +269,7 @@
         # the new revision will not have any of the custom values in
         # it until it is edited. So we need to pull in these values
         set old_project_id $project_id
-        
+
         set project_id [pm::project::edit \
                             -project_item_id $project_item_id \
                             -project_name $project_name \