Description: |
./widgetPlusDemo.tcl
list doesn't contain element 1
while executing
"lreplace $My(,list) $My(,pointer) end $new"
(procedure "::widgetPlus::WidgetPlusPrivateCore::Snit_methodPush" line 8)
invoked from within
"$self Push $new"
(procedure "::widgetPlus::WidgetPlusPrivateCore::Snit_methodinsert" line 18)
invoked from within
"$w insert end {Initial Text}"
(procedure "CreateWidget" line 20)
invoked from within
"CreateWidget $w.g.e"
(procedure "CreateDemo" line 27)
invoked from within
"CreateDemo .wpdemo"
(file "./widgetPlusDemo.tcl" line 102)
|