closing a variable

[rvwinkle]

Can someone help me finish this code by advising on where/how to add the
"close $emaile" line ?

Code: Select all

   1 set emaile "/www/botread.txt"
   2 set cmd "!email"
   3 set bwhere 0
   4 
   5 bind pub -|- $cmd email
   6 proc email {nick handle host chan text } {
   7 global emaile bwhere
   8 set botread [open $emaile r]
   9 while { ! [eof $botread] } {
  10 set outline [gets $botread]
  11 if {!$bwhere} {
  12 putserv "PRIVMSG $chan :\002$outline\002"
  13 }
  14 }
  15 }

[greenbear]

add it after it's done reading the file

Code: Select all

set emaile "/www/botread.txt"
set cmd "!email"
set bwhere 0

bind pub -|- $cmd email

proc email {nick handle host chan text } {
 global emaile bwhere
 set botread [open $emaile r]
 while {![eof $botread]} {
   set outline [gets $botread]
   if {!$bwhere} {
     putserv "PRIVMSG $chan :\002$outline\002"
   }
 }
close $botread
}

[Papillon]

errrr
don't you mean

Code: Select all

unset emaile

instead of close, or

Code: Select all

close $botread

[greenbear]

darn i did it again .. gotta stop replying before reading thru the whole thing

Code: Select all

close $botread