Overview
Comment: | Set default negative ttl to the same as the positive ttl |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
b075183fad7516123a7dc011a53f8469 |
User & Date: | rkeene on 2017-12-15 05:31:00 |
Other Links: | manifest | tags |
Context
2017-12-15
| ||
05:31 | Updated to support a "-lib" option to the "install" command of "appfs-cache" check-in: a664b039b7 user: rkeene tags: trunk | |
05:31 | Set default negative ttl to the same as the positive ttl check-in: b075183fad user: rkeene tags: trunk | |
2017-10-30
| ||
18:03 | Added an "install" command for setting up symlinks to binaries check-in: 8998f05e2e user: rkeene tags: trunk | |
Changes
Modified appfsd.tcl from [985d2df621] to [ced6c30241].
︙ | ︙ | |||
103 104 105 106 107 108 109 | return -code error "Unable to download" } } namespace eval ::appfs { variable cachedir "/tmp/appfs-cache" variable ttl 3600 | | | 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 | return -code error "Unable to download" } } namespace eval ::appfs { variable cachedir "/tmp/appfs-cache" variable ttl 3600 variable nttl 3600 variable trusted_cas [list] variable platform [::platform::generic] proc _hash_sep {hash {seps 4}} { for {set idx 0} {$idx < $seps} {incr idx} { append retval "[string range $hash [expr {$idx * 2}] [expr {($idx * 2) + 1}]]/" } |
︙ | ︙ |