diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-22 17:07:01 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-22 17:07:01 (GMT) |
| commit | 6c6a470c2bc258d42f224373a084ee2a4d61e9a6 (patch) | |
| tree | 5fde96ac0d14b163451029af0097528d7e687230 /library | |
| parent | 3b6d7d61197cc6d63dd33e9527c54a013546a8e2 (diff) | |
| download | tcl-6c6a470c2bc258d42f224373a084ee2a4d61e9a6.zip tcl-6c6a470c2bc258d42f224373a084ee2a4d61e9a6.tar.gz tcl-6c6a470c2bc258d42f224373a084ee2a4d61e9a6.tar.bz2 | |
Rename MODULESCOPE TclGetLoadedPackagesEx() to TclGetLoadedLibraries()
Diffstat (limited to 'library')
| -rw-r--r-- | library/safe.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/safe.tcl b/library/safe.tcl index 27033b2..3c01f75 100644 --- a/library/safe.tcl +++ b/library/safe.tcl @@ -1029,14 +1029,14 @@ proc ::safe::AliasLoad {child file args} { # Determine what kind of load is requested if {$file eq ""} { - # static library loading + # static loading if {$prefix eq ""} { set msg "load error: empty filename and no prefix" Log $child $msg return -code error $msg } if {!$state(staticsok)} { - Log $child "static library loading disabled\ + Log $child "static loading disabled\ (trying to load $prefix to $target)" return -code error "permission denied (static library)" } |