182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
|
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
|
-
+
|
#
return [file join [file dirname [info library]] pkgd]
}
#
# NOTE: This procedure, which is only used with native Tcl, generates a
# package index file (i.e. "pkgIndex.tcl") suitable for use with
# native Tcl, 8.4 or higher. It will recursively [source] other
# native Tcl 8.4 (or higher). It will recursively [source] other
# native Tcl package index files that are within the configured
# persistent root directory, thereby causing all packages located
# within it to become available. Since Eagle (by default) already
# performs a recursive search for its package index files, this
# procedure is not necessary for Eagle packages.
#
proc maybeCreateMasterTclPackageIndex {} {
|