Index: openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl	10 Sep 2002 22:22:36 -0000	1.14
+++ openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl	11 Dec 2003 21:40:02 -0000	1.15
@@ -1014,7 +1014,7 @@
 
 } {
     if { ![regexp -nocase {([0-9]+):([0-9]+):([0-9]+)} $timestamp match hours mins secs]} {
-	ad_return_complaint "1" "<li>The time part of the timestamp is not in the correct format.  It must be HH12:MI:SS" 
+	ad_return_complaint 1 "<li>The time part of the timestamp is not in the correct format.  It must be HH12:MI:SS" 
 	return -code return
     } else {