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: | b075183fad7516123a7dc011a53f8469cb3b66ca |
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 103 return -code error "Unable to download" 104 104 } 105 105 } 106 106 107 107 namespace eval ::appfs { 108 108 variable cachedir "/tmp/appfs-cache" 109 109 variable ttl 3600 110 - variable nttl 60 110 + variable nttl 3600 111 111 variable trusted_cas [list] 112 112 variable platform [::platform::generic] 113 113 114 114 proc _hash_sep {hash {seps 4}} { 115 115 for {set idx 0} {$idx < $seps} {incr idx} { 116 116 append retval "[string range $hash [expr {$idx * 2}] [expr {($idx * 2) + 1}]]/" 117 117 }