@@ -153,11 +153,11 @@ proc download {hostname hash {method sha1}} { set url "http://$hostname/appfs/$method/$hash" set file [_cachefile $url $hash] if {![file exists $file]} { - return -code error "Unable to fetch" + return -code error "Unable to fetch (file does not exist: $file)" } return $file } @@ -187,11 +187,11 @@ set token [::http::geturl $url] if {[::http::ncode $token] == "200"} { set indexhash_data [::http::data $token] } ::http::reset $token - $token cleanup + ::http::cleanup $token } if {![info exists indexhash_data]} { # Cache this result for 60 seconds _db eval {INSERT OR REPLACE INTO sites (hostname, lastUpdate, ttl) VALUES ($hostname, $now, $::appfs::nttl);}