We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 596288b commit 21975bfCopy full SHA for 21975bf
lib/clock.tcl
@@ -570,6 +570,12 @@ proc ::tcl::clock::mcMerge {locales} {
570
if {[dict exists $Msgs $ns $loc]} {
571
set mrgcat [dict merge $mrgcat [dict get $Msgs $ns $loc]]
572
dict set mrgcat L $loc
573
+ # remove any previously localized formats (merged from parent
574
+ # locale and possibly cached in parent-mc by ClockLocalizeFormat),
575
+ # because they may depend on values which may vary in derivate:
576
+ foreach k [dict keys $mrgcat] {
577
+ if {[string match FMT_* $k]} { dict unset mrgcat $k }
578
+ }
579
} else {
580
# be sure a duplicate is created, don't overwrite {} (common) locale:
581
set mrgcat [dict merge $mrgcat [dict create L $loc]]
0 commit comments