Index: openacs-4/packages/invoices/www/invoice-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/invoice-ae.tcl,v
diff -u -r1.39 -r1.40
--- openacs-4/packages/invoices/www/invoice-ae.tcl	19 Oct 2006 17:06:49 -0000	1.39
+++ openacs-4/packages/invoices/www/invoice-ae.tcl	20 Oct 2006 17:45:24 -0000	1.40
@@ -351,10 +351,10 @@
 		set offer(credit_units) $offer(item_units)
 	    }
 	    set offer(credit) [format "%.2f" [expr $offer(credit_units) * $offer(price_per_unit)]]
-	    ns_log Notice "Granted credit:: $offer(credit)"
+	    ns_log Debug "Granted credit:: $offer(credit)"
 	    set offer(credit) [format "%.2f" [expr (1. - ($offer(rebate) / 100.)) * $offer(credit)]]
 	    set offer(credit) [format "%.2f" [expr $offer(credit) - $offer(amount)]]
-	    ns_log Notice "Total credit:: $offer(credit)"
+	    ns_log Debug "Total credit:: $offer(credit)"
 
 	    set offer_name ""
 	    if {![empty_string_p $offer(category)]} {