使用tcllib的autoproxy和tls

Question

tcllib的autoproxy如何与tls支持一起工作？我已经阅读了文档并从中获取了以下最小的示例，但我无法将其与任何https连接进行任何操作：

#!/usr/bin/tclsh
package require autoproxy
package require http
package require tls

::autoproxy::init
::http::register https 443 [list ::autoproxy::tls_socket -tls1 1]
#::http::register https 443 [list ::tls::socket -tls1 1]
set token [::http::geturl "https://example.com/" -validate 1]
puts [::http::meta $token]
::http::cleanup $token

导致：

handshake failed: resource temporarily unavailable
    while executing
"::http::geturl "https://example.com/" -validate 1"
    invoked from within
"set token [::http::geturl "https://example.com/" -validate 1]"
    (file "./https.tcl" line 9)

我没有通过http_proxy envvar定义的代理服务器，并且直接使用:: tls :: socket时它可以正常工作。我使用的是tcl 8.6.1，tcllib 1.15和tls 1.6。