Diff
Not logged in

Differences From Artifact [3abd1211f1]:

To Artifact [ed7eb8b71d]:


1124
1125
1126
1127
1128
1129
1130
1131



1132
1133
1134
1135
1136
1137
1138
1124
1125
1126
1127
1128
1129
1130

1131
1132
1133
1134
1135
1136
1137
1138
1139
1140







-
+
+
+







	if {[catch {
		# Tricky point: [self class] needs to run in the caller
		set ns [namespace qualifiers [uplevel 1 {self class}]]
	}]} {
		# Not a class-defined method (so we got an error); use instance instead
		set ns [namespace qualifiers [uplevel 1 self]]
	}
	tailcall apply [list {cmd args} {tailcall $cmd {*}$args} $ns] $cmd
	apply [list {cmd args} {$cmd {*}$args} $ns] $cmd {*}$args
	# DKF: alternative - one may give a better error trace
	# namespace eval ::$ns [list $cmd {*}$args]
}
  
# Initialize the default locale
proc msgcat::Init {} {
    global env

    #