Index: openacs-4/packages/logger/tcl/apm-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/tcl/apm-callback-procs.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/logger/tcl/apm-callback-procs.tcl	3 Jun 2005 22:22:00 -0000	1.4
+++ openacs-4/packages/logger/tcl/apm-callback-procs.tcl	5 Jun 2005 23:22:34 -0000	1.5
@@ -102,6 +102,9 @@
     {-project_id:required}
     {-data:required}
 } {
+    If we edit the name of the project, we need to edit the logger
+    project name too.
+} {
     array set callback_data $data
     set project_rev_id [pm::project::get_project_id -project_item_id $project_id]
 
@@ -111,9 +114,6 @@
 	where project_id = :project_rev_id
     }
 
-    # if we edit the name of the project, we need to edit the logger
-    # project name too.
-
     set logger_project [lindex [application_data_link::get_linked -from_object_id $project_id -to_object_type logger_project] 0]
     set active_p [pm::status::open_p -task_status_id $status_id]
 
@@ -142,9 +142,9 @@
     {-package_id:required}
     {-task_id:required}
 } {
-    # we have to update all logged hours to make sure the hours are
-    # set to the correct project whenever the project is changed.
-
+    Update all logged hours to make sure the hours are
+    set to the correct project whenever the project is changed.
+} {
     set logger_project [lindex [application_data_link::get_linked -from_object_id $project_item_id -to_object_type logger_project] 0]
 
     db_dml update_logger_entries {