Index: openacs-4/contrib/packages/project-manager/tcl/project-manager-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/tcl/Attic/project-manager-procs.tcl,v diff -u -r1.2.2.7 -r1.2.2.8 --- openacs-4/contrib/packages/project-manager/tcl/project-manager-procs.tcl 20 Sep 2004 18:32:32 -0000 1.2.2.7 +++ openacs-4/contrib/packages/project-manager/tcl/project-manager-procs.tcl 21 Sep 2004 00:29:44 -0000 1.2.2.8 @@ -238,7 +238,7 @@ @param send_email_p Whether or not to send out an email notification t or f - @return + @return the comment_id of the new comment @error -1 if there is an error } { @@ -389,7 +389,7 @@ } - return 1 + return $comment_id }