Now another error -.-' [15:20] missing close-brace while executing "proc whois {nick uhost hand chan txt} { global color1 color2 bd_user bd_pass bd_host bd_dbase bd_table if { $login_ok == 1 } { set m_h..." (file "scripts/test.tcl" line 54) invoked from within "source script...
the error continues :s [15:06] Tcl error in file 'myegg.conf': [15:06] wrong # args: should be "proc name args body" while executing "proc whois { nick uhost hand chan txt }" (file "scripts/test.tcl" line 54) invoked from within "source scripts/test.tcl" (file...
sorry, error lol, the code are: set bd_user "fxp_egg" set bd_pass "password" set bd_host "localhost" set bd_dbase "fxp_test" set bd_table "users" bind msgm - "*" auth bind pub - !whois whois #####Code by tomekk proc auth { nick uhost hand a...
need help in my tcl. proc whois { nick uhost hand chan arg } global color1 color2 bd_user bd_pass bd_host bd_dbase bd_table set bd [::mysql::connect -host $bd_host -user $bd_user -password $bd_pass] if { $login_ok == 1 } { set sd [::mysql::whois $db "SELECT username, level FROM $db_table" ...