Index: openacs-4/packages/invoices/tcl/iv-install-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/tcl/iv-install-procs.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/invoices/tcl/iv-install-procs.tcl 18 May 2006 12:48:46 -0000 1.13 +++ openacs-4/packages/invoices/tcl/iv-install-procs.tcl 1 Nov 2006 14:29:41 -0000 1.14 @@ -287,6 +287,7 @@ } { Create new cost every time a project task is closed } { + if {0} { set task_rev_id [pm::task::get_revision_id -task_item_id $task_id] set project_rev_id [pm::project::get_project_id -project_item_id [pm::task::project_item_id -task_item_id $task_id]] @@ -351,5 +352,6 @@ array unset price } + } }