* library/clock.tcl (format): Changed default timezone format

from alphabetic to numeric to produce scannable times in more
locales.
* tests/clock.test (clock-37.1): Removed now-unused 'needPST'
constraint and the comments that refer to it.

1 files changed, 30 insertions, 7 deletions

diff --git a/tests/clock.test b/tests/clock.test
index 5736dfc..a63ea3c 100644
--- a/tests/clock.test
+++ b/tests/clock.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: clock.test,v 1.36 2004/08/18 20:59:34 kennykb Exp $
+# RCS: @(#) $Id: clock.test,v 1.37 2004/08/19 18:55:25 kennykb Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest 2
@@ -134,6 +134,35 @@ package require msgcat 1.4
 # clock-29
 #	scanning of all time-of-day formats
 #
+# clock-30
+#	[clock add]
+#
+# clock-31
+#	Use of -locale system on Windows
+#
+# clock-32
+#	Handling of the Julian-Gregorian transition
+#
+# clock-33
+#	Legacy tests - [clock clicks]
+#
+# clock-34
+#	Legacy tests - [clock scan] without -format
+#
+# clock-35
+#	Legacy tests - [clock seconds]
+#
+# clock-36
+#	Legacy tests - [clock scan] with 'next monthname'
+#
+# clock-37
+#	Test that -gmt does not affect the value of %s
+#
+# clock-38
+#	Regression test to verify that changes in TZ work
+#	both east and west of Greenwich
+
+
 # Note that all code between comments '# BEGIN' and '# END' is
 # autogenerated by 'tools/makeTestCases.tcl'.  DO NOT EDIT CODE BETWEEN
 # '# BEGIN' and '# END'.
@@ -35163,13 +35192,7 @@ test clock-36.3 {clock scan next monthname} {
 	    -format %m.%Y
 } "05.2001"
 
-set ::tcltest::testConstraints(needPST) [expr {
-    [regexp {^(Pacific.*|P[DS]T)$} [clock format 1 -format %Z]]
-    && ([clock format 1 -format %s] != "%s")
-}]
 test clock-37.1 {%s gmt testing} {
-    # We need PST to guarantee the difference value below, and %s isn't
-    # valid on all OSes (like Solaris).
     set s [clock seconds]
     set a [clock format $s -format %s -gmt 0]
     set b [clock format $s -format %s -gmt 1]