Index: openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	22 Sep 2003 20:41:04 -0000	1.11
+++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	23 Sep 2003 17:29:47 -0000	1.12
@@ -1729,7 +1729,7 @@
 	    || $time(minutes) < 0 || $time(minutes) > 59 \
 	    || $time(seconds) < 0 || $time(seconds) > 59
     } {
-	ad_complain "Invalid time: $time(time) $time(ampm)"
+	ad_complain "Invalid time: $time(time)"
 	return 0
     }