Tcl Source Code: Artifact [f15b99aa5c]

Artifact f15b99aa5c8956469acee13225d998919c189d96:

Attachment "httptest.tcl" to ticket [1414262fff] added by setok 2006-01-25 10:43:42.

package require http

proc test {token} {
    puts called
    dosomethingbad
    return
}

http::geturl "http://news.bbc.co.uk/" -command test
vwait forever