| View previous topic :: View next topic |
| Author |
Message |
Drewbu Guest
|
Posted: Sun Aug 04, 2002 2:45 pm Post subject: Tcl error [test1]: wrong # args: need help! |
|
|
Hi i made a script to send a post request ... and it did work ... but after some time i start to get Tcl error [test1]: wrong # args: should be "join nick uhand handle chan input"
here si code .. plese help me
| Code: | package require http
bind pub - !test test1
proc test1 {nick uhand handle chan input} {
putlog "post requested"
set data test
set url "http://url"
set query [http::formatQuery "body" $data]
http::config -useragent "User-Agent: Mozilla/4.0 (compatible; Eggdrop 1.6)"
set token [http::geturl $url -query $query]
upvar #0 $token state
array set meta $state(meta)
putserv "PRIVMSG $chan :$meta(Location)"
http::cleanup $token
} |
|
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|