Check-in [b075183fad]
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   		}