Index: openacs-4/packages/logger/tcl/projection-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/tcl/projection-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/logger/tcl/projection-procs.tcl	5 Apr 2003 13:10:42 -0000	1.1
+++ openacs-4/packages/logger/tcl/projection-procs.tcl	1 May 2003 21:17:54 -0000	1.2
@@ -16,16 +16,18 @@
     {-start_time:required}
     {-end_time:required}
     {-value:required}
+    {-name:required}
+    {-description:required}
 } {
     Create a new projection for a certain variable and project.
 
     @param projection_id An optional pre-generated id for the projection.
     @param project_id    The id of the project the projection is for
     @param variable_id   The id of the variable the projection is for
     @param start_time    Marks the start of the time range the projection is for.
-                         Must be on ANSI format.
+                         Must be on ANSI day format "YYYY-MM-DD".
     @param end_time      Marks the end of the time range the projection is for.
-                         Must be on ANSI format.
+                         Must be on ANSI day format "YYYY-MM-DD".
     @param value         The anticipated or targeted value (a sum for 
                          additive variables, an average for non-additive 
                          variables).
@@ -45,6 +47,25 @@
     return $projection_id
 }
 
+ad_proc -public logger::projection::edit {
+    {-projection_id ""}
+    {-variable_id:required}
+    {-start_time:required}
+    {-end_time:required}
+    {-value:required}
+    {-name:required}
+    {-description:required}
+} {
+    Edit a projection. The parameters are explained in the 
+    logger::projection::new proc.
+
+    @return The return value of db_dml
+
+    @author Peter Marklund
+} {
+    db_dml update_projection {}
+}
+
 ad_proc -public logger::projection::delete {
     {-projection_id:required}
 } {