Posted to tcl by hypnotoad at Mon Jan 07 23:21:10 GMT 2019view raw

  1. wish% taotk::dialog
  2. invalid command name "self"
  3. wish% set errorInfo
  4. invalid command name "self"
  5. while executing
  6. "self"
  7. (class "::tao::object" destructor line 3)
  8. invoked from within
  9. "next"
  10. (class "::taotk::meta::widget" destructor line 10)
  11. invoked from within
  12. "$tempobj destroy"
  13. (procedure "taotk::dialog" line 16)
  14. invoked from within
  15. "taotk::dialog "
  16. ("uplevel" body line 1)
  17. invoked from within
  18. "uplevel #0 $cmd"