Artifact
d81608d87f12290c0e34b6172fe677b715481017c53f5bcca7e2125f3e0d303d:
Attachment "patch-library_safe_tcl" to
ticket [eb268f246f]
added by
stu
2017-12-24 23:00:27.
$OpenBSD$
Index: library/safe.tcl
--- library/safe.tcl.orig
+++ library/safe.tcl
@@ -352,6 +352,8 @@ proc ::safe::InterpSetConfig {slave access_path static
# Prevent the addition of dirs on the tm list to the
# result if they are already known.
if {[dict exists $remap_access_path $dir]} {
+ # The dir must nevertheless be added to the slave's tm_path. Bug [eb268f246f].
+ lappend slave_tm_path [dict get $remap_access_path $dir]
continue
}