[GRASSLIST:2784] Error in startup script

[bouffy]

Hi,

I've got a problem when I run the tcltkgrass command.
The following message appears :

-------------
 Error in startup script: unmatched open brace in list
       while executing
 "llenght $line"
       invoked from within
 "if ![catch {open ~/.tcltkgrass r} stream] {
       while {[gets $stream line] >= 0} {
          if {[llenght $line] != 2 || \
              [set i [scan [lin..."
       (file "/usr/local/grass5/tcltkgrass/main/gui.tcl" line 1840)
       invoked from within
 "source $env(TCLTKGRASSBASE)/main/gui.tcl"
       (file "/usr/local/grass5/bin/tcltkgrass" line 17)
-------------

Is it a problem with the environment variables ?

Thanks for help

----
julien