Check-in [0ee20f0650]
Bounty program for improvements to Tcl and certain Tcl packages.
Overview
Comment:Enabled a more tolerant (if confusing) mechanism for requiring Tcl 8.5
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | tls-1-7
Files: files | file ages | folders
SHA1: 0ee20f0650ed718ef774654d80e56f975b33f013
User & Date: rkeene on 2016-12-06 16:38:13
Other Links: branch diff | manifest | tags
Context
2016-12-06
16:53
Updated to ensure that the SNI functinality was available from the SSL library check-in: 7f86ac3e48 user: rkeene tags: tls-1-7
16:38
Enabled a more tolerant (if confusing) mechanism for requiring Tcl 8.5 check-in: 0ee20f0650 user: rkeene tags: tls-1-7
16:27
Updated to indicate that we require Tcl 8.5 check-in: 301d32328a user: rkeene tags: tls-1-7
Changes

Modified pkgIndex.tcl.in from [69126671a0] to [d65b3a0b3b].

1
2
3
4
5
6
7
8
9
10
11
12

package ifneeded tls @[email protected] [join [list [list package require Tcl 8.5] [list apply {{dir} {
	if {{@[email protected]} eq "static"} {
		load {} Tls
	} else {
		load [file join $dir [email protected]@] Tls
	}

	set tlsTclInitScript [file join $dir tls.tcl]
	if {[file exists $tlsTclInitScript]} {
		source $tlsTclInitScript
	}
}} $dir]] "; "]

>
|
|
|
|
|
|

|
|
|
|
|
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
if {[package vsatisfies [package present Tcl] 8.5]} {
	package ifneeded tls @[email protected] [list apply {{dir} {
		if {{@[email protected]} eq "static"} {
			load {} Tls
		} else {
			load [file join $dir [email protected]@] Tls
		}

		set tlsTclInitScript [file join $dir tls.tcl]
		if {[file exists $tlsTclInitScript]} {
			source $tlsTclInitScript
		}
	}} $dir]
}