http

[caesar]

Code: Select all

package require http 2.4

bind pub - !bla my:bla

proc my:bla {nick uhost hand chan text} {
set tok [::http::geturl "http://someserver/" -timeout 120]
set var [::http::code $tok]
catch {::http::cleanup $tok}
putserv "PRIVMSG $chan :$var"
}

Just ignore the code, I want to wask something about it. When I start it all seems ok. After I'll .rehash it it dies with:

(21:34:07) ::: <bot> [21:39] invalid command name "tclPkgUnknown"
(21:34:07) ::: <bot> while executing
(21:34:07) ::: <bot> "tclPkgUnknown http 2.4"

What I did wrong there?