diff options
| author | kjnash <k.j.nash@usa.net> | 2020-08-28 01:03:23 (GMT) |
|---|---|---|
| committer | kjnash <k.j.nash@usa.net> | 2020-08-28 01:03:23 (GMT) |
| commit | 953e3ea89962393c4b65866feb0f3d38f4bc8b14 (patch) | |
| tree | 29f9fed7a671620791e416b3b50e65c1cdf855a7 /library | |
| parent | 3b1ca15e0739a1650dbc9c0de1429299326078ee (diff) | |
| download | tcl-953e3ea89962393c4b65866feb0f3d38f4bc8b14.zip tcl-953e3ea89962393c4b65866feb0f3d38f4bc8b14.tar.gz tcl-953e3ea89962393c4b65866feb0f3d38f4bc8b14.tar.bz2 | |
Update safe.test for new error message.
Diffstat (limited to 'library')
| -rw-r--r-- | library/safe.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/safe.tcl b/library/safe.tcl index c0a5dc6..352b302 100644 --- a/library/safe.tcl +++ b/library/safe.tcl @@ -1069,7 +1069,7 @@ proc ::safe::AliasLoad {slave file args} { return [::interp invokehidden $slave load $file $package $target] } on error msg { # Some packages return no error message. - set msg0 "Load of binary library for package $package failed" + set msg0 "load of binary library for package $package failed" if {$msg eq {}} { set msg $msg0 } else { |