egghelp/eggheads community

Odd little error

2002-11-17T15:42:20-04:00

set rulefile [open $rulepath r]
while {![eof $rulefile]} {

Thats the code i was basing it off, looks like it misread it completely

thanks as always ppslim

Statistics: Posted by Weirdo — Sun Nov 17, 2002 3:42 pm

Odd little error

2002-11-17T14:28:19-04:00

Yes, you are correct, it does open the file.

However, it then remains that you are passing the wrong arguments to other functions.

Look at the "eof" command you have used.

You are passing it the file name, not the channel name (Tcl calls then channel names. This is due to the fact, it's a channel through which a Tcl script can talk to a file).

Statistics: Posted by ppslim — Sun Nov 17, 2002 2:28 pm

Odd little error

2002-11-17T04:12:15-04:00

set stars(file) [open $stars(path) r]

i thou8ght that line loadfed it

Statistics: Posted by Weirdo — Sun Nov 17, 2002 4:12 am

Odd little error

2002-11-16T20:49:26-04:00

Before you can use file functions like eof, gets, close, etc, you have to open the file. Use the 'open' command. It gives you a handle to the open file. Then you use that handle for the file functions.

Statistics: Posted by stdragon — Sat Nov 16, 2002 8:49 pm

Odd little error

2002-11-16T20:08:00-04:00

Hello

Well, i decided to use the looping and file picking up code i learnt, thanks to you guys whilst making my rules script, and use it to replace the hard coded variables in my url storage and favourites scripts. But...

[00:04:46] [00:04] Tcl error [pub:stars]: can not find channel named "text/stars.file"

"text/stars.file" is equal to stars(path) in the script, so what is wrong? Is it just my typoing syntax again?

Code:

bind pub - !stars pub:starsproc pub:stars {nick host hand chan text} {global runchan starsif {$chan == $runchan} {if {[file exists $stars(path)]} {putlog "File Exists, loading"set stars(file) [open $stars(path) r]while {![eof $stars(path)]} {catch {set stars(text) [gets $stars(file)]}puthelp "Notice $nick :$stars(text)"}catch {close $stars(file)}putlog "!$nick - $hand! Stars url List"} {putlog "Unable to Open $stars(path), file does not exist"puthelp "Notice $nick :An Error has occured, please contact the Administrator"}} {putlog "Unable to run !stars trigger, incorrect channel"puthelp "Notice $nick :This command is not avaliable on this channel"}}

Statistics: Posted by Weirdo — Sat Nov 16, 2002 8:08 pm