diff options
author | ericm <ericm@noemail.net> | 2000-08-03 21:59:35 (GMT) |
---|---|---|
committer | ericm <ericm@noemail.net> | 2000-08-03 21:59:35 (GMT) |
commit | b90db7787ce55d1a4ad472c7f24b826e8a6de414 (patch) | |
tree | 5f75863ee93146a3cb71e0d1922a13189205915e /library | |
parent | 4f3922ae41c1fd6450226119c93d812dc09d4688 (diff) | |
download | tcl-b90db7787ce55d1a4ad472c7f24b826e8a6de414.zip tcl-b90db7787ce55d1a4ad472c7f24b826e8a6de414.tar.gz tcl-b90db7787ce55d1a4ad472c7f24b826e8a6de414.tar.bz2 |
Finished backport of mcunknown fix for 8.3.2.
FossilOrigin-Name: dbab6ab30f168dfb8d6e1b2a02847fb1b9b4d664
Diffstat (limited to 'library')
-rw-r--r-- | library/msgcat/msgcat.tcl | 4 | ||||
-rw-r--r-- | library/msgcat1.0/msgcat.tcl | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/library/msgcat/msgcat.tcl b/library/msgcat/msgcat.tcl index cd78c23..f8749bc 100644 --- a/library/msgcat/msgcat.tcl +++ b/library/msgcat/msgcat.tcl @@ -10,7 +10,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: msgcat.tcl,v 1.4.2.1 2000/08/03 21:40:15 ericm Exp $ +# RCS: @(#) $Id: msgcat.tcl,v 1.4.2.2 2000/08/03 21:59:35 ericm Exp $ package provide msgcat 1.0 @@ -67,7 +67,7 @@ proc msgcat::mc {src args} { } # we have not found the translation return [uplevel 1 [list [namespace origin mcunknown] \ - $::msgcat::locale $src]] + $::msgcat::locale $src] $args] } # msgcat::mclocale -- diff --git a/library/msgcat1.0/msgcat.tcl b/library/msgcat1.0/msgcat.tcl index cd78c23..f8749bc 100644 --- a/library/msgcat1.0/msgcat.tcl +++ b/library/msgcat1.0/msgcat.tcl @@ -10,7 +10,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: msgcat.tcl,v 1.4.2.1 2000/08/03 21:40:15 ericm Exp $ +# RCS: @(#) $Id: msgcat.tcl,v 1.4.2.2 2000/08/03 21:59:35 ericm Exp $ package provide msgcat 1.0 @@ -67,7 +67,7 @@ proc msgcat::mc {src args} { } # we have not found the translation return [uplevel 1 [list [namespace origin mcunknown] \ - $::msgcat::locale $src]] + $::msgcat::locale $src] $args] } # msgcat::mclocale -- |