-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathpkgIndex.tcl.in
More file actions
42 lines (39 loc) · 2.36 KB
/
Copy pathpkgIndex.tcl.in
File metadata and controls
42 lines (39 loc) · 2.36 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
if { [package vsatisfies [package provide Tcl] 9.0-] } {
package ifneeded @PACKAGE_NAME@::c @PACKAGE_VERSION@ \
[list load [file join $dir @PKG_LIB_FILE9@] [string totitle @PACKAGE_NAME@]]
} else {
package ifneeded @PACKAGE_NAME@::c @PACKAGE_VERSION@ \
[list load [file join $dir @PKG_LIB_FILE8@] [string totitle @PACKAGE_NAME@]]
}
package ifneeded @PACKAGE_NAME@::tcl::pkgconfig @PACKAGE_VERSION@ [list source [file join $dir pkgconfig.tcl]]
package ifneeded @PACKAGE_NAME@::tcl::writerchannel @PACKAGE_VERSION@ [list source [file join $dir writerchannel.tcl]]
package ifneeded @PACKAGE_NAME@::tcl::vfs @PACKAGE_VERSION@ [list source [file join $dir vfs.tcl]]
package ifneeded @PACKAGE_NAME@::tcl::readerchannel @PACKAGE_VERSION@ [list source [file join $dir readerchannel.tcl]]
package ifneeded @PACKAGE_NAME@::tcl::writer @PACKAGE_VERSION@ [list source [file join $dir writer.tcl]]
package ifneeded @PACKAGE_NAME@::tcl::pages @PACKAGE_VERSION@ [list source [file join $dir pages.tcl]]
package ifneeded @PACKAGE_NAME@::tcl::fsindex @PACKAGE_VERSION@ [list source [file join $dir fsindex.tcl]]
package ifneeded @PACKAGE_NAME@::asyncworker::process @PACKAGE_VERSION@ [list source [file join $dir asyncworker_process.tcl]]
package ifneeded @PACKAGE_NAME@::asyncworker::thread @PACKAGE_VERSION@ [list source [file join $dir asyncworker_thread.tcl]]
package ifneeded @PACKAGE_NAME@ @PACKAGE_VERSION@ [list ::apply {{ dir } {
# As for now, always load C module
package require @PACKAGE_NAME@::c @PACKAGE_VERSION@
if { ![llength [info commands @PACKAGE_NAME@::pkgconfig]] } {
package require @PACKAGE_NAME@::tcl::pkgconfig @PACKAGE_VERSION@
}
if { ![@PACKAGE_NAME@::pkgconfig get c-pages] } {
package require @PACKAGE_NAME@::tcl::pages @PACKAGE_VERSION@
}
if { ![@PACKAGE_NAME@::pkgconfig get c-fsindex] } {
package require @PACKAGE_NAME@::tcl::fsindex @PACKAGE_VERSION@
}
if { ![@PACKAGE_NAME@::pkgconfig get c-vfs] } {
package require @PACKAGE_NAME@::tcl::vfs @PACKAGE_VERSION@
}
if { ![@PACKAGE_NAME@::pkgconfig get c-writer] } {
package require @PACKAGE_NAME@::tcl::writer @PACKAGE_VERSION@
}
}} $dir]
package ifneeded vfs::@PACKAGE_NAME@ @PACKAGE_VERSION@ [list ::apply {{ dir } {
package require @PACKAGE_NAME@ @PACKAGE_VERSION@
package provide vfs::@PACKAGE_NAME@ @PACKAGE_VERSION@
}} $dir]