[REBOL] Re: Rebgui error in table widget
From: robert::muench::robertmuench::de at: 17-Mar-2007 11:57
On Sat, 17 Mar 2007 10:24:40 +0100, Graham Chiu <compkarori-gmail.com>
wrote:
> Got this error:
>
> make object! [
> code: 303
> type: 'script
> id: 'expect-arg
> arg1: 'index?
> arg2: 'series
> arg3: [series! port!]
> near: [index? find parent-face/data last-selected]
> where: 'action
> ]
Hi Graham, this has been fixed in our version.
> So, I guess the fix in table.r is to try this:
>
> Instead of:
> ;BEG fixed by Cyphre, sponsored by Robert
> if last-selected [
> select-row (((index? find parent-face/data last-selected) - 1) /
> cols) + 1
> ]
> ;END fixed by Cyphre, sponsored by Robert
This is the actual code now:
;BEG fixed by Cyphre, sponsored by Robert
if all [last-selected last-selected: find parent-face/data last-selected][
select-row/no-action to-integer (((index? last-selected) - 1) / p/cols)
+ 1
]
if not same? parent-face/data parent-face/pane/1/data [
parent-face/pane/1/data: parent-face/data
]
;END fixed by Cyphre, sponsored by Robert
Hope this helps. Robert
