On Sat, Feb 15, 2003 at 10:47:23AM +0000, Tilmann Singer wrote:
> > I've found out that log is a nice command to use along with assert,
> > since assert is silent when it succeeds, it may be good to move it
> > to the public api.
>
> Please do so! ;)
Done.
Index: lib/tclwebtest.tcl
===================================================================
RCS file: /cvsroot/tclwebtest/tclwebtest/lib/tclwebtest.tcl,v
retrieving revision 1.24
diff -u -r1.24 tclwebtest.tcl
--- lib/tclwebtest.tcl 15 Feb 2003 10:53:00 -0000 1.24
+++ lib/tclwebtest.tcl 15 Feb 2003 11:00:27 -0000
@@ -217,7 +217,14 @@
}
-proc log msg {
+ad_proc -public log {
+ msg
+} {
+
+ Adds msg to the output log.
+
+} {
+
variable log_channel
if { ![info exists log_channel] || $log_channel == "" } {
--
Grzegorz Adam Hankiewicz, gr...@ef.... Tel: +34-94-472 35 89.
eFaber SL, Maria Diaz de Haro, 68, 2 http://www.efaber.net/
48920 Portugalete, Bizkaia (SPAIN)
|