Index: client/lib/teapotclient0.1/teapotclient.tcl ================================================================== --- client/lib/teapotclient0.1/teapotclient.tcl +++ client/lib/teapotclient0.1/teapotclient.tcl @@ -123,11 +123,13 @@ set url "http://$server/package/name/$extension/ver/$ver/arch/$arch/file" set urlcachefile [file join $::teapotclient::pkgcachedir [::md5::md5 -hex $url]] if {![file exists $urlcachefile]} { set tmpfd [open $urlcachefile w] - set token [::http::geturl $url -channel $tmpfd] + fconfigure $tmpfd -encoding binary -translation binary -buffering none + + set token [::http::geturl $url -binary true -channel $tmpfd] ::http::cleanup $token close $tmpfd }