Index: openacs-4/packages/project-manager/tcl/project-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/tcl/project-procs.tcl,v diff -u -r1.44 -r1.45 --- openacs-4/packages/project-manager/tcl/project-procs.tcl 19 Feb 2007 15:56:54 -0000 1.44 +++ openacs-4/packages/project-manager/tcl/project-procs.tcl 12 Aug 2007 00:39:36 -0000 1.45 @@ -15,7 +15,7 @@ ad_proc -public pm::project::get_project_id { -project_item_id:required } { - Returns the live project_id when give the project_item_id + Returns the best project_id when give the project_item_id @author Jade Rubick (jader@bread.com) @creation-date 2004-02-19 @@ -26,9 +26,7 @@ @error } { - set return_val [db_string get_project_id { }] - - return $return_val + return [content::item::get_best_revision -item_id $project_item_id] }