diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-04-12 09:35:08 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-04-12 09:35:08 (GMT) |
commit | 3b742b785e159e8a3b9e25c985fd67ab028a19d2 (patch) | |
tree | 9f339863ba93d52279c75d3bb1967f4395f9a604 /library/safe.tcl | |
parent | 6bdd668a7ce4815e5beb82b3fe15262f99d44987 (diff) | |
download | tcl-3b742b785e159e8a3b9e25c985fd67ab028a19d2.zip tcl-3b742b785e159e8a3b9e25c985fd67ab028a19d2.tar.gz tcl-3b742b785e159e8a3b9e25c985fd67ab028a19d2.tar.bz2 |
Correct spelling errors in comments and documentation, but also non-comment
corrections in history.tcl and tcltest.test.
Diffstat (limited to 'library/safe.tcl')
-rw-r--r-- | library/safe.tcl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/library/safe.tcl b/library/safe.tcl index 59e4c90..1eafec0 100644 --- a/library/safe.tcl +++ b/library/safe.tcl @@ -169,7 +169,7 @@ proc ::safe::interpConfigure {args} { # it is most probably a set in fact but we would need # then to jump to the set part and it is not *sure* # that it is a set action that the user want, so force - # it to use the unambigous -statics ?value? instead: + # it to use the unambiguous -statics ?value? instead: return -code error\ "ambigous query (get or set -noStatics ?)\ use -statics instead" @@ -220,7 +220,7 @@ proc ::safe::interpConfigure {args} { } # we can now reconfigure : InterpSetConfig $slave $accessPath $statics $nested $deleteHook - # auto_reset the child (to completly synch the new access_path) + # auto_reset the child (to completely synch the new access_path) if {$doreset} { if {[catch {::interp eval $slave {auto_reset}} msg]} { Log $slave "auto_reset failed: $msg" @@ -332,7 +332,7 @@ proc ::safe::InterpSetConfig {child access_path staticsok nestedok deletehook} { moved it to front of slave's access_path" NOTICE } - # Add 1st level sub dirs (will searched by auto loading from tcl + # Add 1st level subdirs (will searched by auto loading from tcl # code in the child using glob and thus fail, so we add them here # so by default it works the same). set access_path [AddSubDirs $access_path] @@ -602,7 +602,7 @@ proc ::safe::interpDelete {child} { } # If the child has a cleanup hook registered, call it. Check the - # existance because we might be called to delete an interp which has + # existence because we might be called to delete an interp which has # not been registered with us at all if {[info exists state(cleanupHook)]} { @@ -636,7 +636,7 @@ proc ::safe::interpDelete {child} { return } -# Set (or get) the logging mecanism +# Set (or get) the logging mechanism proc ::safe::setLogCmd {args} { variable Log |