From 8d48f83e10fc5715983619a0194cc1f0ffcc0260 Mon Sep 17 00:00:00 2001 From: Kevin B Kenny Date: Sun, 1 Oct 2006 20:59:01 +0000 Subject: Bug 1567956 --- ChangeLog | 7 ++++++- tests/clock.test | 7 ++++--- 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index b343f77..3b2fe72 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,4 +1,9 @@ -2006-10-01 Miguel Sofer +2006-10-01 Kevin Kenny + + * tests/clock.test (clock-49.2): Removed a locale dependency + that caused a spurious failure in the German locale. [Bug 1567956] + +2006-10-01 Miguel Sofer * doc/Eval.3 (TclEvalObjv): added note on refCount management for the elements of objv, [Bug #730244]. diff --git a/tests/clock.test b/tests/clock.test index fb9af4f..3eb6ed0 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.67 2006/08/24 21:47:50 kennykb Exp $ +# RCS: @(#) $Id: clock.test,v 1.68 2006/10/01 20:59:01 kennykb Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 @@ -223,6 +223,7 @@ namespace eval ::testClock { [dict create \ HKEY_CURRENT_USER\\Control\ Panel\\International \ [dict create \ + locale 0409 \ sShortDate dd-MMM-yyyy \ sLongDate "'the' dd''' day of' MMMM yyyy" \ sTimeFormat "h:mm:ss tt"] \ @@ -35954,7 +35955,7 @@ test clock-49.2 {regression test - missing time zone file (Bug 1237907)} \ } \ -body { list [::tcl::clock::GuessWindowsTimeZone] \ - [clock format 0 -locale system -format "%X %Z"] \ + [clock format 0 -locale system -format "%H:%M:%S %Z"] \ [clock format -86400 -format "%Y"] } \ -cleanup { @@ -35975,7 +35976,7 @@ test clock-49.2 {regression test - missing time zone file (Bug 1237907)} \ :America/New_York ::tcl::clock::ClearCaches } \ - -result {<-0500>+05:00:00<-0400>+04:00:00,M4.1.0/02:00:00,M10.5.0/02:00:00 { 7:00:00 PM -0500} 1969} + -result {<-0500>+05:00:00<-0400>+04:00:00,M4.1.0/02:00:00,M10.5.0/02:00:00 {19:00:00 -0500} 1969} test clock-50.1 {format / scan -1 as a local time} { if {[catch { -- cgit v0.12