diff --git a/tiifetch.tcl b/tiifetch.tcl
index b347271..b74e059 100755
--- a/tiifetch.tcl
+++ b/tiifetch.tcl
@@ -153,7 +153,7 @@ proc getfile {url} {
       } else {return {}}
     }
     https - http {
-      set hs [::http::geturl $url -binary 1 -keepalive 1 -timeout 5000]
+      set hs [::http::geturl $url -binary 1 -keepalive 0 -timeout 4000]
       if {[::http::ncode $hs] eq "200"} {
         return [::http::data $hs]
       } else {return {}}