Index: openacs-4/packages/accounts-finance/tcl/finance-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/accounts-finance/tcl/finance-procs.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/accounts-finance/tcl/finance-procs.tcl	26 May 2010 23:53:27 -0000	1.9
+++ openacs-4/packages/accounts-finance/tcl/finance-procs.tcl	5 Jun 2010 02:00:11 -0000	1.10
@@ -413,7 +413,6 @@
     units done = number of units produced, amount of miles driven etc.
     The various depreciations are referenced from one function so that multiple depreciation scenarios can be easily referenced within model variations.
 } {
-# proc acc_fin::qaf_depreciation_schedule {     depreciation_type original_cost {scrap_value ""} {depreciation_rate ""} {units_of_activity ""} {units_done ""} } {
     set depreciation_list [list]
     # convert units_done and depreciation_rate to lists, if they are supplied that way
     if { [llength $units_done] > 1 } {