diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | tests/httpd | 3 |
2 files changed, 6 insertions, 2 deletions
@@ -13,6 +13,9 @@ 2004-08-18 Kevin Kenny <kennykb@acm.org> + * tests/httpd (httpdRespond): Corrected an abuse of the [clock] + command that caused test failures for some values of [clock clicks]. + * doc/clock.n * generic/tclBasic.c (Tcl_CreateInterp, Tcl_HideUnsafeCommands): * generic/tclClock.c (all): @@ -57,7 +60,7 @@ Scheffers, Peter da Silva and Richard Suchenwirth-Bauersachs. *** POTENTIAL INCOMPATIBILITY *** - + 2004-08-16 Miguel Sofer <msofer@users.sf.net> * doc/SetVar.3: diff --git a/tests/httpd b/tests/httpd index 2bef362..f41c3c1 100644 --- a/tests/httpd +++ b/tests/httpd @@ -201,7 +201,8 @@ proc httpdRespond { sock } { } else { puts $sock "HTTP/1.0 200 Data follows" } - puts $sock "Date: [clock format [clock clicks]]" + puts $sock "Date: [clock format [clock seconds] \ + -format {%a, %d %b %Y %H:%M:%S %Z}]" puts $sock "Content-Type: $type" puts $sock "Content-Length: [string length $html]" puts $sock "" |