egghelp/eggheads community

Re: calling a proc from within a proc - SOLVED

2008-07-02T22:38:43-04:00

Thanks Speechless
Thats solved it

} i always overlook those

many thanks, i feel daft now

Statistics: Posted by John_m0wev — Wed Jul 02, 2008 10:38 pm

Re: calling a proc from within a proc

2008-07-02T10:47:27-04:00

Code:

; # up here is hopefully your bind and procedure header  set sql "SELECT username FROM users WHERE username = '$sgnick' "  putloglev d * "ircstats: executing $sql"  set result [mysqlsel $db_handle $sql ]  if {$result == 1} {     putquick "PRIVMSG #mods-lounge : Check 1  "    disp_mods $sgnick  } else {    putlog "calling ghstcheck proc"    ghst_check $ghostnick  }} ;# this is your missing closing brace, you must close the procedure  proc disp_mods { sgnick } {  # blah blah} ; # again, you forgot to close the procedureproc ghst_check { ghostnick } {  # blah blah} ; # again, you forgot to close the procedure

Statistics: Posted by speechles — Wed Jul 02, 2008 10:47 am

calling a proc from within a proc - SOLVED

2008-07-02T22:39:01-04:00

When my script starts, it goes into a proc
Upon the result of $result being either 1 or 0 it should call another proc
it aint
can someone put me on the right track.

Code:

set sql "SELECT username FROM users WHERE username = '$sgnick' "  putloglev d * "ircstats: executing $sql"  set result [mysqlsel $db_handle $sql ]  if {$result == 1} {   putquick "PRIVMSG #mods-lounge : Check 1  "  disp_mods $sgnick  } else { putlog "calling ghstcheck proc"  ghst_check $ghostnick }    proc disp_mods { sgnick } {  blah blah  proc ghst_check { ghostnick } {  blah blah

the error i recieve is this -
Tcl error [regcheck]: invalid command name "ghst_check"
and
Tcl error [regcheck]: invalid command name "disp_mods"

Statistics: Posted by John_m0wev — Wed Jul 02, 2008 6:00 am