Posted to tcl by kostix at Thu Nov 16 21:42:31 GMT 2006view raw

  1. list element in braces followed by ")" instead of space
  2. list element in braces followed by ")" instead of space
  3. while executing
  4. "lsearch -exact $UserList) $nick"
  5. (procedure "::tkchat::ChangeColors" line 75)
  6. invoked from within
  7. "::tkchat::ChangeColors"
  8. invoked from within
  9. ".#mbar.#mbar#edit invoke active"
  10. ("uplevel" body line 1)
  11. invoked from within
  12. "uplevel #0 [list $w invoke active]"
  13. (procedure "tk::MenuInvoke" line 47)
  14. invoked from within
  15. "tk::MenuInvoke .#mbar.#mbar#edit 1"
  16. (command bound to event)