[therion] New developement snapshot.
Stacho Mudrak
s.m at speleo.sk
Mon Feb 21 15:44:15 CET 2005
Isn't it just because of old version of TCL?
S.
John Pybus wrote:
> Stacho Mudrak wrote:
>
>> Martin Sluka wrote:
>>
>>> At 10:34 +0100 21.2.2005, Stacho Mudrak wrote:
>>> *******************************************
>>>
>>>> Waiting for feedback and comments :)
>>>
>>>
>>>
>>>
>>>
>>> May you, please, publish any short example, how it works?
>>> TIA
>
>
>
> I've tried your Tornala example with xtherion from the dev snapshot. When I try to insert the .xvi image I get:
>
> -------
> bad search mode "-integer": must be -exact, -glob, or -regexp
> bad search mode "-integer": must be -exact, -glob, or -regexp
> while executing
> "lsearch -integer $xth(me,imgs,xlist) $imgx"
> (procedure "xth_me_imgs_xvi_create" line 62)
> invoked from within
> "xth_me_imgs_xvi_create $imgx"
> (procedure "xth_me_image_insert" line 176)
> invoked from within
> "xth_me_image_insert $xth(ctrl,me,images,posx) $xth(ctrl,me,images,posy) {} 0 {}"
> ("uplevel" body line 1)
> invoked from within
> "uplevel \#0 $cmd"
> (procedure "Button::_release" line 19)
> invoked from within
> "Button::_release .xth.me.af.ctrl.cf11.f.ic.insp"
> (command bound to event)
> -------
>
> And moving around the canvas gives:
>
> -------
> bad index "": must be integer or end?-integer?
> bad index "": must be integer or end?-integer?
> while executing
> "lindex $xth(me,imgs,xlist) $iidx"
> (procedure "xth_me_image_select" line 22)
> invoked from within
> "xth_me_image_select [lsearch $xth(me,imgs,xlist) $imgx]"
> (procedure "xth_me_image_choose" line 3)
> invoked from within
> "xth_me_image_choose $imgx"
> (procedure "xth_me_area_end_drag" line 10)
> invoked from within
> "xth_me_area_end_drag 20 "0" 459 389"
> (command bound to event)
> -------
>
> $ rpm -q tcl
> tcl-8.3.5-88
>
> John
>
>
More information about the Therion
mailing list