diff options
Diffstat (limited to 'tools/loadICU.tcl')
| -rwxr-xr-x | tools/loadICU.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/loadICU.tcl b/tools/loadICU.tcl index a41a8dc..0ca33b6 100755 --- a/tools/loadICU.tcl +++ b/tools/loadICU.tcl @@ -26,7 +26,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: loadICU.tcl,v 1.1 2004/08/18 19:59:09 kennykb Exp $ +# RCS: @(#) $Id: loadICU.tcl,v 1.1.4.1 2005/10/08 13:45:04 dgp Exp $ # #---------------------------------------------------------------------- @@ -617,6 +617,6 @@ foreach { icudir msgdir } $argv break foreach fileName [glob -directory $icudir *.txt] { set n [file rootname [file tail $fileName]] if { [regexp {^[a-z]{2,3}(_[A-Z]{2,3}(_.*)?)?$} $n] } { - handleLocaleFile $n $fileName [file join $msgdir ${n}.msg] + handleLocaleFile $n $fileName [file join $msgdir [string tolower $n].msg] } } |