egghelp/eggheads community

Trouble with info exists

2004-07-13T09:03:37-04:00

I hate myself
Sorry for this really stupid question, I promise I won't re-ask it

Statistics: Posted by CrazyCat — Tue Jul 13, 2004 9:03 am

Trouble with info exists

2004-07-13T08:47:38-04:00

Try this:

Code:

set looking [string tolower [lindex [split $text] 0]]    if {[info exists ::lexik($looking)]} {

Statistics: Posted by KrzychuG — Tue Jul 13, 2004 8:47 am

Trouble with info exists

2004-07-13T08:03:32-04:00

Hi there,

I'm creating variables with the content of a file.
The working part:

Code:

foreach templine [split $data "\n"] {set faq_line [split $templine "="]regsub -all \# [lindex $faq_line 1] "\037" lex_textset lexik([string tolower [lindex $faq_line 0]]) $lex_text}

And then, users can type !lexique to call a definition wich is in $lexik(keyword)
But... the following test always match:

Code:

set looking [string tolower [lindex [split $text] 0]]if {[info exists $::lexik($looking)]} {

$text is the keyword the user enter... and the tcl always find that an info exists.
Can someone tell me where is the trouble plz?

Thx by advance

Statistics: Posted by CrazyCat — Tue Jul 13, 2004 8:03 am